📄 unit_cjyfk.dfm
字号:
Width = 775
Height = 42
BevelOuter = bvNone
TabOrder = 2
object btn_first1: TButton
Left = 18
Top = 9
Width = 73
Height = 25
Caption = #39318#35760#24405
Font.Charset = ANSI_CHARSET
Font.Color = clPurple
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = btn_first1Click
end
object btn_prev1: TButton
Left = 90
Top = 9
Width = 73
Height = 25
Caption = #21069#19968#26465
Font.Charset = ANSI_CHARSET
Font.Color = clPurple
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = btn_prev1Click
end
object btn_next1: TButton
Left = 162
Top = 9
Width = 73
Height = 25
Caption = #21518#19968#26465
Font.Charset = ANSI_CHARSET
Font.Color = clPurple
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = btn_next1Click
end
object btn_last1: TButton
Left = 234
Top = 9
Width = 73
Height = 25
Caption = #23614#35760#24405
Font.Charset = ANSI_CHARSET
Font.Color = clPurple
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = btn_last1Click
end
object btn_addnew1: TButton
Left = 306
Top = 9
Width = 73
Height = 25
Caption = #26032#22686
Font.Charset = ANSI_CHARSET
Font.Color = clPurple
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = btn_addnew1Click
end
object btn_edit1: TButton
Left = 450
Top = 9
Width = 73
Height = 25
Caption = #32534#36753
Font.Charset = ANSI_CHARSET
Font.Color = clPurple
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = btn_edit1Click
end
object btn_save1: TButton
Left = 523
Top = 9
Width = 73
Height = 25
Caption = #20445#23384
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clPurple
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = btn_save1Click
end
object btn_cancel1: TButton
Left = 595
Top = 9
Width = 75
Height = 25
Caption = #21462#28040
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clPurple
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
OnClick = btn_cancel1Click
end
object Button1: TButton
Left = 670
Top = 9
Width = 75
Height = 25
Caption = #36864#20986
TabOrder = 8
OnClick = Button1Click
end
object btn_delete: TButton
Left = 378
Top = 9
Width = 73
Height = 25
Caption = #21024#38500
TabOrder = 9
OnClick = btn_deleteClick
end
end
end
object TabSheet5: TTabSheet
Caption = #25152#26377#20986#26426#24212#20184#27454
ImageIndex = 4
object Panel4: TPanel
Left = 0
Top = 469
Width = 775
Height = 74
Align = alBottom
BevelOuter = bvNone
TabOrder = 0
object Button8: TButton
Left = 125
Top = 8
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 0
OnClick = Button8Click
end
object Button10: TButton
Left = 312
Top = 8
Width = 75
Height = 25
Caption = #25171#21360
TabOrder = 1
OnClick = Button10Click
end
object Button9: TButton
Left = 216
Top = 8
Width = 75
Height = 25
Caption = #25152#26377#35760#24405
TabOrder = 2
OnClick = Button9Click
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 775
Height = 469
Align = alClient
Color = clInfoBk
DataSource = DataSource1
ReadOnly = True
TabOrder = 1
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #24207#21495
Visible = True
end
item
Expanded = False
FieldName = #26085#26399
Visible = True
end
item
Expanded = False
FieldName = #21378#23478#21517#31216
Visible = True
end
item
Expanded = False
FieldName = #21512#21516#21495
Visible = True
end
item
Expanded = False
FieldName = #26426#22411
Visible = True
end
item
Expanded = False
FieldName = #25968#37327
Visible = True
end
item
Expanded = False
FieldName = #21333#20215
Visible = True
end
item
Expanded = False
FieldName = #37329#39069
Visible = True
end
item
Expanded = False
FieldName = #21457#31080#21495#30721
Visible = True
end
item
Expanded = False
FieldName = #20986#24211#21333#21495#30721
Visible = True
end
item
Expanded = False
FieldName = #24050#20184#37329#39069#26085#26399
Visible = True
end
item
Expanded = False
FieldName = #25903#31080#21495
Visible = True
end
item
Expanded = False
FieldName = #24050#20184#37329#39069
Visible = True
end
item
Expanded = False
FieldName = #21512#35745
Visible = True
end
item
Expanded = False
FieldName = #24212#20184#27454
Visible = True
end
item
Expanded = False
FieldName = #23457#25209
Visible = True
end
item
Expanded = False
FieldName = #22797#26680
Visible = True
end
item
Expanded = False
FieldName = #21046#21333
Visible = True
end
item
Expanded = False
FieldName = #22791#27880#35828#26126
Visible = True
end
item
Expanded = False
FieldName = #24405#20837#26102#38388
Visible = True
end>
end
end
object TabSheet6: TTabSheet
Caption = 'TabSheet6'
ImageIndex = 5
TabVisible = False
end
end
object Panel3: TPanel
Left = 1
Top = 1
Width = 801
Height = 9
Align = alTop
BevelOuter = bvNone
TabOrder = 1
end
end
object DataSource1: TDataSource
DataSet = Query1
Left = 4
Top = 12
end
object Query1: TADOQuery
Connection = dm_wxp.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from pub_z_machine_outpay')
Left = 52
Top = 12
object Query1DSDesigner: TAutoIncField
FieldName = #24207#21495
ReadOnly = True
end
object Query1DSDesigner2: TDateTimeField
FieldName = #26085#26399
end
object Query1DSDesigner3: TStringField
FieldName = #21378#23478#21517#31216
Size = 40
end
object Query1DSDesigner4: TStringField
FieldName = #21512#21516#21495
Size = 50
end
object Query1DSDesigner5: TStringField
FieldName = #26426#22411
Size = 40
end
object Query1DSDesigner6: TIntegerField
FieldName = #25968#37327
end
object Query1DSDesigner7: TBCDField
FieldName = #21333#20215
Precision = 19
end
object Query1DSDesigner8: TBCDField
FieldName = #37329#39069
Precision = 19
end
object Query1DSDesigner9: TStringField
FieldName = #21457#31080#21495#30721
Size = 40
end
object Query1DSDesigner10: TStringField
FieldName = #20986#24211#21333#21495#30721
end
object Query1DSDesigner11: TDateTimeField
FieldName = #24050#20184#37329#39069#26085#26399
end
object Query1DSDesigner12: TStringField
FieldName = #25903#31080#21495
Size = 40
end
object Query1DSDesigner13: TBCDField
FieldName = #24050#20184#37329#39069
Precision = 19
end
object Query1DSDesigner14: TBCDField
FieldName = #21512#35745
Precision = 19
end
object Query1DSDesigner15: TBCDField
FieldName = #24212#20184#27454
Precision = 19
end
object Query1DSDesigner16: TStringField
FieldName = #32534#21046#21333#20301
Size = 50
end
object Query1DSDesigner17: TStringField
FieldName = #26376#20221
end
object Query1DSDesigner18: TStringField
FieldName = #23457#25209
end
object Query1DSDesigner19: TStringField
FieldName = #22797#26680
end
object Query1DSDesigner20: TStringField
FieldName = #21046#21333
end
object Query1DSDesigner21: TStringField
FieldName = #22791#27880#35828#26126
Size = 100
end
object Query1DSDesigner22: TDateTimeField
FieldName = #24405#20837#26102#38388
end
object Query1DSDesigner23: TStringField
FieldName = #21150#20107#22788
Size = 40
end
object Query1DSDesigner24: TDateTimeField
FieldName = #19978#25253#26102#38388
end
end
object Query_contract_client: TQuery
DatabaseName = 'zxjx'
SQL.Strings = (
'select * from pub_z_contract_machine '
'')
Left = 675
Top = 190
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -