Group_99/D7myYunxiang
7
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
e5a0893d5d
D7myYunxiang/工资管理(Wage.dll)/U_XHGZInPut.dfm

1027 lines
25 KiB
Plaintext
Raw Normal View History

1
2025-01-20 13:04:03 +08:00
object frmXHGZInPut: TfrmXHGZInPut
Left = 431
Top = 67
251013
2025-10-13 13:18:40 +08:00
Width = 927
Height = 911
1
2025-01-20 13:04:03 +08:00
Caption = #24037#36164#30331#35760
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -15
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnShow = FormShow
251013
2025-10-13 13:18:40 +08:00
PixelsPerInch = 120
TextHeight = 15
1
2025-01-20 13:04:03 +08:00
object ToolBar1: TToolBar
Left = 0
Top = 0
251013
2025-10-13 13:18:40 +08:00
Width = 919
1
2025-01-20 13:04:03 +08:00
Height = 29
ButtonHeight = 30
ButtonWidth = 67
Caption = 'ToolBar1'
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
Images = DataLink_Wage.ThreeImgList
List = True
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBSave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 5
OnClick = TBSaveClick
end
object TBClose: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object ScrollBox1: TScrollBox
Left = 0
Top = 29
251013
2025-10-13 13:18:40 +08:00
Width = 919
Height = 845
1
2025-01-20 13:04:03 +08:00
Align = alClient
BevelInner = bvLowered
BevelOuter = bvRaised
Ctl3D = True
ParentCtl3D = False
TabOrder = 1
OnClick = ScrollBox1Click
object Label2: TLabel
251013
2025-10-13 13:18:40 +08:00
Left = 135
Top = 16
Width = 57
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 486
Top = 85
Width = 57
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #26426#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label22: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 169
Top = 189
Width = 10
Height = 18
1
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label27: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 115
Top = 85
Width = 76
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #26426#21488#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label28: TLabel
251013
2025-10-13 13:18:40 +08:00
Left = 486
Top = 50
Width = 57
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #24037#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label37: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 446
Top = 428
Width = 95
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #20854#23427#21333#20215#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label39: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 446
Top = 470
Width = 95
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #20854#20182#24037#36164#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label51: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 105
Top = 616
Width = 108
Height = 35
1
2025-01-20 13:04:03 +08:00
Caption = #21512#35745#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -35
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label24: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 446
Top = 226
Width = 95
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #20135#37327#24037#36164#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
251013
2025-10-13 13:18:40 +08:00
Left = 486
Top = 16
Width = 57
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #29677#27425#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
251013
2025-10-13 13:18:40 +08:00
Left = 135
Top = 50
Width = 57
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #22995#21517#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 95
Top = 120
Width = 95
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #33457#22411#21517#31216#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 436
Top = 189
Width = 10
Height = 18
1
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 96
Top = 470
Width = 95
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #20854#20182#25968#37327#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 446
Top = 540
Width = 95
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #25187#27454#37329#39069#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 90
Top = 670
Width = 57
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #22791#27880#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 446
Top = 366
Width = 95
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #34917#21161#37329#39069#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 385
Top = 366
Width = 10
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = '%'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 446
Top = 326
Width = 95
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #34917#21161#37329#39069#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 385
Top = 326
Width = 10
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = '%'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label19: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 28
Top = 151
Width = 830
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption =
'----------------------------------------------------------------' +
'-------------------'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label20: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 28
Top = 293
Width = 830
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption =
'----------------------------------------------------------------' +
'-------------------'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label21: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 28
Top = 400
Width = 830
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption =
'----------------------------------------------------------------' +
'-------------------'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 96
Top = 428
Width = 95
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #20854#20182#34917#21161#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 96
Top = 540
Width = 95
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #25187#27454#20869#23481#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 28
Top = 575
Width = 830
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption =
'----------------------------------------------------------------' +
'-------------------'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 28
Top = 503
Width = 830
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption =
'----------------------------------------------------------------' +
'-------------------'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
251013
2025-10-13 13:18:40 +08:00
Left = 131
Top = 266
Width = 57
Height = 18
1
2025-01-20 13:04:03 +08:00
Caption = #36793#25968#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object CRTime: TDateTimePicker
251013
2025-10-13 13:18:40 +08:00
Left = 194
Top = 11
Width = 161
Height = 26
1
2025-01-20 13:04:03 +08:00
BevelInner = bvNone
Date = 40916.000000000000000000
Format = 'yyyy-MM-dd'
Time = 40916.000000000000000000
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 0
end
object CLBZQty: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 200
Top = 361
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 17
OnExit = MiShuExit
OnKeyPress = qjtsKeyPress
end
object MiShu: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 200
Top = 184
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 9
OnExit = MiShuExit
OnKeyPress = qjtsKeyPress
end
object ZhenShu: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 550
Top = 184
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 10
OnExit = MiShuExit
OnKeyPress = qjtsKeyPress
end
object JTNo: TcxButtonEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 194
Top = 80
1
2025-01-20 13:04:03 +08:00
BeepOnEnter = False
ParentFont = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = cxButtonEdit3PropertiesButtonClick
Style.Font.Charset = GB2312_CHARSET
Style.Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Style.Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Style.Font.Name = #23435#20307
Style.Font.Style = [fsBold]
Style.IsFontAssigned = True
TabOrder = 4
OnKeyPress = JTNoKeyPress
251013
2025-10-13 13:18:40 +08:00
Width = 161
1
2025-01-20 13:04:03 +08:00
end
object YGCode: TEdit
251013
2025-10-13 13:18:40 +08:00
Left = 550
Top = 45
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 3
end
object Price1: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 550
Top = 423
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
BiDiMode = bdLeftToRight
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
ParentFont = False
TabOrder = 20
OnExit = MiShuExit
OnKeyPress = qjtsKeyPress
end
object ElseWage: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 550
Top = 465
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
BiDiMode = bdLeftToRight
Font.Charset = GB2312_CHARSET
Font.Color = clRed
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
ParentFont = False
TabOrder = 22
OnExit = MiShuExit
OnKeyPress = qjtsKeyPress
end
object Price: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 200
Top = 221
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 11
OnExit = MiShuExit
OnKeyPress = qjtsKeyPress
end
object Money: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 225
Top = 611
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 37
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clRed
251013
2025-10-13 13:18:40 +08:00
Font.Height = -35
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 25
OnKeyPress = MoneyKeyPress
end
object Note: TMemo
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 150
Top = 670
Width = 741
Height = 79
1
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
ScrollBars = ssVertical
TabOrder = 26
OnKeyPress = NoteKeyPress
end
object OutputWage: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 550
Top = 221
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clRed
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 12
OnExit = MiShuExit
OnKeyPress = qjtsKeyPress
end
object BanCi: TEdit
251013
2025-10-13 13:18:40 +08:00
Left = 550
Top = 11
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 1
end
object YGName: TEdit
251013
2025-10-13 13:18:40 +08:00
Left = 194
Top = 45
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 2
end
object JXModel: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 550
Top = 80
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 5
OnKeyPress = JTNoKeyPress
end
object HXName: TcxButtonEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 194
Top = 115
1
2025-01-20 13:04:03 +08:00
BeepOnEnter = False
ParentFont = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = HXNamePropertiesButtonClick
Style.Font.Charset = GB2312_CHARSET
Style.Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Style.Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Style.Font.Name = #23435#20307
Style.Font.Style = [fsBold]
Style.IsFontAssigned = True
TabOrder = 6
OnKeyPress = JTNoKeyPress
251013
2025-10-13 13:18:40 +08:00
Width = 446
1
2025-01-20 13:04:03 +08:00
end
object TouJu: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 638
Top = 115
Width = 71
1
2025-01-20 13:04:03 +08:00
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 7
OnKeyPress = JTNoKeyPress
end
object KKMoney: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 550
Top = 535
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
BiDiMode = bdLeftToRight
Font.Charset = GB2312_CHARSET
Font.Color = clGreen
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
ParentFont = False
TabOrder = 24
OnExit = MiShuExit
OnKeyPress = qjtsKeyPress
end
object Qty1: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 195
Top = 465
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
BiDiMode = bdLeftToRight
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
ParentFont = False
TabOrder = 21
OnExit = MiShuExit
OnKeyPress = qjtsKeyPress
end
object ElseWageName: TcxButtonEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 195
Top = 423
1
2025-01-20 13:04:03 +08:00
BeepOnEnter = False
ParentFont = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = ElseWageNamePropertiesButtonClick
Style.Font.Charset = GB2312_CHARSET
Style.Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Style.Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Style.Font.Name = #23435#20307
Style.Font.Style = [fsBold]
Style.IsFontAssigned = True
TabOrder = 19
OnExit = MiShuExit
OnKeyPress = ElseWageNameKeyPress
251013
2025-10-13 13:18:40 +08:00
Width = 161
1
2025-01-20 13:04:03 +08:00
end
object ISMS: TCheckBox
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 110
Top = 188
Width = 81
Height = 21
1
2025-01-20 13:04:03 +08:00
Caption = #31859#25968#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnClick = ISMSClick
OnExit = ISMSExit
OnKeyPress = ISMSKeyPress
end
object ISZS: TCheckBox
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 423
Top = 188
Width = 123
Height = 21
1
2025-01-20 13:04:03 +08:00
Caption = #38024#25968'('#19975')'#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 27
OnClick = ISZSClick
OnExit = ISMSExit
OnKeyPress = ISMSKeyPress
end
object IFCLBZ: TCheckBox
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 78
Top = 365
Width = 111
Height = 21
1
2025-01-20 13:04:03 +08:00
Caption = #20135#37327#34917#21161#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 16
OnClick = IFCLBZClick
OnExit = ISMSExit
OnKeyPress = ISMSKeyPress
end
object CLBZMoney: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 550
Top = 361
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clRed
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 18
OnExit = MiShuExit
OnKeyPress = qjtsKeyPress
end
object TXBZQty: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 200
Top = 321
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 14
OnExit = MiShuExit
OnKeyPress = qjtsKeyPress
end
object IFTXBZ: TCheckBox
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 78
Top = 325
Width = 111
Height = 21
1
2025-01-20 13:04:03 +08:00
Caption = #36339#32447#34917#21161#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 13
OnClick = IFTXBZClick
OnExit = ISMSExit
OnKeyPress = ISMSKeyPress
end
object TXBZMoney: TEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 550
Top = 321
Width = 161
1
2025-01-20 13:04:03 +08:00
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clRed
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 15
OnExit = MiShuExit
OnKeyPress = qjtsKeyPress
end
object KKNote: TcxButtonEdit
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 195
Top = 535
1
2025-01-20 13:04:03 +08:00
BeepOnEnter = False
ParentFont = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = KKNotePropertiesButtonClick
Style.Font.Charset = GB2312_CHARSET
Style.Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Style.Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Style.Font.Name = #23435#20307
Style.Font.Style = [fsBold]
Style.IsFontAssigned = True
TabOrder = 23
OnExit = MiShuExit
OnKeyPress = KKNoteKeyPress
251013
2025-10-13 13:18:40 +08:00
Width = 166
1
2025-01-20 13:04:03 +08:00
end
object IsPrice: TCheckBox
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 110
Top = 225
Width = 81
Height = 21
1
2025-01-20 13:04:03 +08:00
Caption = #21333#20215#65306
Checked = True
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
State = cbChecked
TabOrder = 28
OnClick = IsPriceClick
OnExit = ISMSExit
OnKeyPress = ISMSKeyPress
end
object BSType: TComboBox
Tag = 1
251013
2025-10-13 13:18:40 +08:00
Left = 200
Top = 260
Width = 161
Height = 26
1
2025-01-20 13:04:03 +08:00
Style = csDropDownList
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
251013
2025-10-13 13:18:40 +08:00
Font.Height = -18
1
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = []
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
251013
2025-10-13 13:18:40 +08:00
ItemHeight = 18
1
2025-01-20 13:04:03 +08:00
ParentFont = False
TabOrder = 29
Items.Strings = (
#21333#36793
#21452#36793)
end
end
object ADOTemp: TADOQuery
Connection = DataLink_Wage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 524
Top = 65532
end
object ADOCmd: TADOQuery
Connection = DataLink_Wage.ADOLink
Parameters = <>
Left = 449
Top = 1
end
object ADOMain: TADOQuery
Connection = DataLink_Wage.ADOLink
Parameters = <>
Left = 608
Top = 1
end
end
Reference in New Issue Copy Permalink