476 lines
10 KiB
Plaintext
476 lines
10 KiB
Plaintext
|
|
object frmKHSKInPut: TfrmKHSKInPut
|
||
|
|
Left = 330
|
||
|
|
Top = 56
|
||
|
|
Width = 684
|
||
|
|
Height = 769
|
||
|
|
Caption = #23458#25143#25910#27454#24405#20837
|
||
|
|
Color = clBtnFace
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -19
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
OldCreateOrder = False
|
||
|
|
Position = poScreenCenter
|
||
|
|
OnClose = FormClose
|
||
|
|
OnDestroy = FormDestroy
|
||
|
|
OnShow = FormShow
|
||
|
|
PixelsPerInch = 120
|
||
|
|
TextHeight = 19
|
||
|
|
object ToolBar1: TToolBar
|
||
|
|
Left = 0
|
||
|
|
Top = 0
|
||
|
|
Width = 666
|
||
|
|
Height = 31
|
||
|
|
ButtonHeight = 30
|
||
|
|
ButtonWidth = 73
|
||
|
|
Caption = 'ToolBar1'
|
||
|
|
Color = clSkyBlue
|
||
|
|
DisabledImages = DataLink_Money.ThreeImgList
|
||
|
|
Flat = True
|
||
|
|
Images = DataLink_Money.ThreeImgList
|
||
|
|
List = True
|
||
|
|
ParentColor = False
|
||
|
|
ShowCaptions = True
|
||
|
|
TabOrder = 0
|
||
|
|
object ToolButton4: TToolButton
|
||
|
|
Left = 0
|
||
|
|
Top = 0
|
||
|
|
AutoSize = True
|
||
|
|
Caption = #20445#23384
|
||
|
|
ImageIndex = 14
|
||
|
|
OnClick = ToolButton4Click
|
||
|
|
end
|
||
|
|
object TBClose: TToolButton
|
||
|
|
Left = 77
|
||
|
|
Top = 0
|
||
|
|
AutoSize = True
|
||
|
|
Caption = #20851#38381
|
||
|
|
ImageIndex = 55
|
||
|
|
OnClick = TBCloseClick
|
||
|
|
end
|
||
|
|
object Panel2: TPanel
|
||
|
|
Left = 154
|
||
|
|
Top = 0
|
||
|
|
Width = 423
|
||
|
|
Height = 30
|
||
|
|
BevelOuter = bvNone
|
||
|
|
Color = clSkyBlue
|
||
|
|
TabOrder = 0
|
||
|
|
object FactoryNoSub: TEdit
|
||
|
|
Left = 0
|
||
|
|
Top = -1
|
||
|
|
Width = 99
|
||
|
|
Height = 32
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -24
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 0
|
||
|
|
Visible = False
|
||
|
|
end
|
||
|
|
object HuMing: TEdit
|
||
|
|
Left = 104
|
||
|
|
Top = -1
|
||
|
|
Width = 265
|
||
|
|
Height = 32
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -24
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 1
|
||
|
|
Visible = False
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object Panel1: TPanel
|
||
|
|
Left = 0
|
||
|
|
Top = 31
|
||
|
|
Width = 666
|
||
|
|
Height = 691
|
||
|
|
Align = alClient
|
||
|
|
BevelInner = bvRaised
|
||
|
|
BevelOuter = bvLowered
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -18
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 1
|
||
|
|
object Label1: TLabel
|
||
|
|
Left = 345
|
||
|
|
Top = 196
|
||
|
|
Width = 72
|
||
|
|
Height = 18
|
||
|
|
Caption = #39033#30446#25688#35201
|
||
|
|
end
|
||
|
|
object Label3: TLabel
|
||
|
|
Left = 20
|
||
|
|
Top = 37
|
||
|
|
Width = 68
|
||
|
|
Height = 18
|
||
|
|
Caption = #23458' '#25143
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -18
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label2: TLabel
|
||
|
|
Left = 263
|
||
|
|
Top = 92
|
||
|
|
Width = 72
|
||
|
|
Height = 18
|
||
|
|
Caption = #36134#21333#26376#20221
|
||
|
|
end
|
||
|
|
object Label5: TLabel
|
||
|
|
Left = 20
|
||
|
|
Top = 196
|
||
|
|
Width = 72
|
||
|
|
Height = 18
|
||
|
|
Caption = #25910#27454#26041#24335
|
||
|
|
end
|
||
|
|
object Label4: TLabel
|
||
|
|
Left = 20
|
||
|
|
Top = 628
|
||
|
|
Width = 72
|
||
|
|
Height = 18
|
||
|
|
Caption = #22791' '#27880
|
||
|
|
end
|
||
|
|
object Label6: TLabel
|
||
|
|
Left = 508
|
||
|
|
Top = 91
|
||
|
|
Width = 36
|
||
|
|
Height = 18
|
||
|
|
Caption = #24065#31181
|
||
|
|
end
|
||
|
|
object Label7: TLabel
|
||
|
|
Left = 60
|
||
|
|
Top = 377
|
||
|
|
Width = 164
|
||
|
|
Height = 40
|
||
|
|
Caption = #27700#21333#37329#39069
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -40
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label8: TLabel
|
||
|
|
Left = 20
|
||
|
|
Top = 92
|
||
|
|
Width = 72
|
||
|
|
Height = 18
|
||
|
|
Caption = #25910#27454#26085#26399
|
||
|
|
end
|
||
|
|
object Label9: TLabel
|
||
|
|
Left = 101
|
||
|
|
Top = 141
|
||
|
|
Width = 360
|
||
|
|
Height = 18
|
||
|
|
Caption = #27880#65306#36134#21333#26376#20221#8594#35813#25910#27454#23545#24212#21738#19968#20010#26376#20221#30340#25910#27454
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clRed
|
||
|
|
Font.Height = -18
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label10: TLabel
|
||
|
|
Left = 414
|
||
|
|
Top = 37
|
||
|
|
Width = 54
|
||
|
|
Height = 18
|
||
|
|
Caption = #21512#21516#21495
|
||
|
|
end
|
||
|
|
object Label11: TLabel
|
||
|
|
Left = 20
|
||
|
|
Top = 256
|
||
|
|
Width = 114
|
||
|
|
Height = 18
|
||
|
|
Caption = #25910#27454#36134#25143#32534#21495
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -18
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label13: TLabel
|
||
|
|
Left = 299
|
||
|
|
Top = 253
|
||
|
|
Width = 114
|
||
|
|
Height = 18
|
||
|
|
Caption = #25910#27454#36134#25143#21517#31216
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -18
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label12: TLabel
|
||
|
|
Left = 60
|
||
|
|
Top = 469
|
||
|
|
Width = 164
|
||
|
|
Height = 40
|
||
|
|
Caption = #23454#25910#37329#39069
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -40
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label14: TLabel
|
||
|
|
Left = 260
|
||
|
|
Top = 560
|
||
|
|
Width = 196
|
||
|
|
Height = 27
|
||
|
|
Caption = #25163#32493#36153#33258#24049#25215#25285
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -27
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label15: TLabel
|
||
|
|
Left = 20
|
||
|
|
Top = 308
|
||
|
|
Width = 72
|
||
|
|
Height = 18
|
||
|
|
Caption = #23545#26041#25260#22836
|
||
|
|
end
|
||
|
|
object Label16: TLabel
|
||
|
|
Left = 384
|
||
|
|
Top = 308
|
||
|
|
Width = 36
|
||
|
|
Height = 18
|
||
|
|
Caption = #36134#21495
|
||
|
|
end
|
||
|
|
object CRTime: TDateTimePicker
|
||
|
|
Left = 343
|
||
|
|
Top = 87
|
||
|
|
Width = 140
|
||
|
|
Height = 26
|
||
|
|
Date = 41256.000000000000000000
|
||
|
|
Format = 'yyyy-MM'
|
||
|
|
Time = 41256.000000000000000000
|
||
|
|
TabOrder = 0
|
||
|
|
end
|
||
|
|
object FactoryName: TBtnEditC
|
||
|
|
Tag = 2
|
||
|
|
Left = 100
|
||
|
|
Top = 32
|
||
|
|
Width = 289
|
||
|
|
Height = 27
|
||
|
|
Hint = 'FactoryNo'
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -18
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
ReadOnly = True
|
||
|
|
TabOrder = 1
|
||
|
|
OnBtnUpClick = FactoryNameBtnUpClick
|
||
|
|
OnBtnDnClick = FactoryNameBtnDnClick
|
||
|
|
end
|
||
|
|
object YFName: TBtnEditC
|
||
|
|
Tag = 2
|
||
|
|
Left = 426
|
||
|
|
Top = 191
|
||
|
|
Width = 214
|
||
|
|
Height = 27
|
||
|
|
ReadOnly = True
|
||
|
|
TabOrder = 2
|
||
|
|
OnBtnUpClick = YFNameBtnUpClick
|
||
|
|
OnBtnDnClick = YFNameBtnDnClick
|
||
|
|
end
|
||
|
|
object PayMent: TBtnEditC
|
||
|
|
Tag = 2
|
||
|
|
Left = 101
|
||
|
|
Top = 191
|
||
|
|
Width = 214
|
||
|
|
Height = 27
|
||
|
|
ReadOnly = True
|
||
|
|
TabOrder = 3
|
||
|
|
OnBtnUpClick = PayMentBtnUpClick
|
||
|
|
OnBtnDnClick = PayMentBtnDnClick
|
||
|
|
end
|
||
|
|
object Note: TEdit
|
||
|
|
Tag = 2
|
||
|
|
Left = 103
|
||
|
|
Top = 624
|
||
|
|
Width = 537
|
||
|
|
Height = 26
|
||
|
|
TabOrder = 4
|
||
|
|
end
|
||
|
|
object BZType: TComboBox
|
||
|
|
Tag = 2
|
||
|
|
Left = 547
|
||
|
|
Top = 86
|
||
|
|
Width = 93
|
||
|
|
Height = 26
|
||
|
|
Style = csDropDownList
|
||
|
|
ItemHeight = 18
|
||
|
|
TabOrder = 5
|
||
|
|
OnChange = BZTypeChange
|
||
|
|
Items.Strings = (
|
||
|
|
#65509
|
||
|
|
'$')
|
||
|
|
end
|
||
|
|
object ShuiDanMoney: TEdit
|
||
|
|
Tag = 2
|
||
|
|
Left = 229
|
||
|
|
Top = 365
|
||
|
|
Width = 340
|
||
|
|
Height = 66
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -45
|
||
|
|
Font.Name = #24494#36719#38597#40657
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 6
|
||
|
|
end
|
||
|
|
object SKDate: TDateTimePicker
|
||
|
|
Tag = 2
|
||
|
|
Left = 100
|
||
|
|
Top = 87
|
||
|
|
Width = 139
|
||
|
|
Height = 26
|
||
|
|
Date = 41256.000000000000000000
|
||
|
|
Format = 'yyyy-MM-dd'
|
||
|
|
Time = 41256.000000000000000000
|
||
|
|
TabOrder = 7
|
||
|
|
OnChange = SKDateChange
|
||
|
|
end
|
||
|
|
object ConNo: TEdit
|
||
|
|
Tag = 2
|
||
|
|
Left = 475
|
||
|
|
Top = 32
|
||
|
|
Width = 163
|
||
|
|
Height = 26
|
||
|
|
TabOrder = 8
|
||
|
|
end
|
||
|
|
object BKNO: TBtnEditC
|
||
|
|
Tag = 2
|
||
|
|
Left = 143
|
||
|
|
Top = 251
|
||
|
|
Width = 129
|
||
|
|
Height = 27
|
||
|
|
Hint = 'GSNO'
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -18
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
ReadOnly = True
|
||
|
|
TabOrder = 9
|
||
|
|
OnBtnUpClick = BKNOBtnUpClick
|
||
|
|
OnBtnDnClick = BKNOBtnDnClick
|
||
|
|
end
|
||
|
|
object HuMingJC: TEdit
|
||
|
|
Left = 426
|
||
|
|
Top = 246
|
||
|
|
Width = 212
|
||
|
|
Height = 31
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -23
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
ReadOnly = True
|
||
|
|
TabOrder = 10
|
||
|
|
end
|
||
|
|
object ShiShouMoney: TEdit
|
||
|
|
Tag = 2
|
||
|
|
Left = 229
|
||
|
|
Top = 456
|
||
|
|
Width = 340
|
||
|
|
Height = 66
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -45
|
||
|
|
Font.Name = #24494#36719#38597#40657
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 11
|
||
|
|
end
|
||
|
|
object ShouXuFlag: TEdit
|
||
|
|
Tag = 2
|
||
|
|
Left = 460
|
||
|
|
Top = 548
|
||
|
|
Width = 49
|
||
|
|
Height = 45
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -37
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
ReadOnly = True
|
||
|
|
TabOrder = 12
|
||
|
|
Text = #8730
|
||
|
|
OnClick = ShouXuFlagClick
|
||
|
|
end
|
||
|
|
object SKTaiTou: TBtnEditC
|
||
|
|
Tag = 2
|
||
|
|
Left = 101
|
||
|
|
Top = 303
|
||
|
|
Width = 275
|
||
|
|
Height = 27
|
||
|
|
ReadOnly = True
|
||
|
|
TabOrder = 13
|
||
|
|
OnBtnUpClick = SKTaiTouBtnUpClick
|
||
|
|
OnBtnDnClick = SKTaiTouBtnDnClick
|
||
|
|
end
|
||
|
|
object SKBankNo: TEdit
|
||
|
|
Tag = 2
|
||
|
|
Left = 426
|
||
|
|
Top = 300
|
||
|
|
Width = 212
|
||
|
|
Height = 31
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -23
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
ReadOnly = True
|
||
|
|
TabOrder = 14
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object ADOQueryTemp: TADOQuery
|
||
|
|
Connection = DataLink_Money.ADOLink
|
||
|
|
LockType = ltReadOnly
|
||
|
|
Parameters = <>
|
||
|
|
Left = 533
|
||
|
|
Top = 41
|
||
|
|
end
|
||
|
|
object ADOQueryCmd: TADOQuery
|
||
|
|
Connection = DataLink_Money.ADOLink
|
||
|
|
Parameters = <>
|
||
|
|
Left = 533
|
||
|
|
Top = 73
|
||
|
|
end
|
||
|
|
object ADOQueryMain: TADOQuery
|
||
|
|
Connection = DataLink_Money.ADOLink
|
||
|
|
LockType = ltReadOnly
|
||
|
|
Parameters = <>
|
||
|
|
Left = 533
|
||
|
|
Top = 105
|
||
|
|
end
|
||
|
|
end
|