📄 sdocrd.dfm
字号:
object Shape26: TShape
Left = 8
Top = 125
Width = 129
Height = 1
Pen.Color = clWhite
end
object Shape27: TShape
Left = 8
Top = 145
Width = 129
Height = 1
Pen.Color = clWhite
end
object Label26: TLabel
Left = 8
Top = 70
Width = 48
Height = 13
Caption = #30005#35805'2 '
end
object Label27: TLabel
Left = 8
Top = 48
Width = 51
Height = 13
Caption = #30005#35805'1 '
end
object DBEdit8: TDBEdit
Left = 120
Top = 88
Width = 161
Height = 18
BorderStyle = bsNone
TabOrder = 0
end
object DBEdit9: TDBEdit
Left = 120
Top = 68
Width = 161
Height = 18
BorderStyle = bsNone
TabOrder = 1
end
object DBEdit15: TDBEdit
Left = 120
Top = 28
Width = 161
Height = 18
BorderStyle = bsNone
TabOrder = 2
end
object DBEdit16: TDBEdit
Left = 120
Top = 48
Width = 161
Height = 18
BorderStyle = bsNone
TabOrder = 3
end
object DBEdit17: TDBEdit
Left = 120
Top = 8
Width = 161
Height = 18
BorderStyle = bsNone
TabOrder = 4
end
object DBEdit19: TDBEdit
Left = 120
Top = 168
Width = 161
Height = 18
BorderStyle = bsNone
TabOrder = 5
end
object DBEdit20: TDBEdit
Left = 120
Top = 128
Width = 161
Height = 18
BorderStyle = bsNone
TabOrder = 6
end
object DBEdit21: TDBEdit
Left = 120
Top = 148
Width = 161
Height = 18
BorderStyle = bsNone
TabOrder = 7
end
object DBEdit22: TDBEdit
Left = 120
Top = 108
Width = 97
Height = 18
BorderStyle = bsNone
TabOrder = 8
end
end
object TabSheet3: TTabSheet
Caption = ' '#22320#22336' '
ImageIndex = 2
object Shape2: TShape
Left = 8
Top = 64
Width = 129
Height = 1
Pen.Color = clWhite
end
object Shape1: TShape
Left = 8
Top = 128
Width = 129
Height = 1
Pen.Color = clWhite
end
object Label2: TLabel
Left = 8
Top = 74
Width = 42
Height = 13
Caption = #24320#31080#21040' '
end
object Label1: TLabel
Left = 8
Top = 8
Width = 51
Height = 13
Caption = #21457#36816#21040' '
end
object DBMemo2: TDBMemo
Left = 104
Top = 72
Width = 177
Height = 57
BorderStyle = bsNone
DataField = 'Building'
DataSource = DataSource1
TabOrder = 0
end
object DBMemo1: TDBMemo
Left = 104
Top = 8
Width = 177
Height = 57
BorderStyle = bsNone
DataField = 'MailBuildi'
DataSource = DataSource1
TabOrder = 1
end
end
object TabSheet4: TTabSheet
Caption = ' '#20184#27454#20869#23481' '
ImageIndex = 3
object Shape23: TShape
Left = 8
Top = 105
Width = 129
Height = 1
Pen.Color = clWhite
end
object Shape28: TShape
Left = 8
Top = 85
Width = 129
Height = 1
Pen.Color = clWhite
end
object Label23: TLabel
Left = 8
Top = 69
Width = 69
Height = 13
Caption = #24635#35745#25240#25187' '
end
object Label28: TLabel
Left = 8
Top = 88
Width = 75
Height = 13
Caption = #20449#29992#39069#24230' '
end
object Label29: TLabel
Left = 8
Top = 48
Width = 78
Height = 13
Caption = #20215#26684#28165#21333' '
end
object Shape29: TShape
Left = 8
Top = 65
Width = 129
Height = 1
Pen.Color = clWhite
end
object Shape30: TShape
Left = 8
Top = 25
Width = 129
Height = 1
Pen.Color = clWhite
end
object Shape31: TShape
Left = 8
Top = 45
Width = 129
Height = 1
Pen.Color = clWhite
end
object Label30: TLabel
Left = 8
Top = 30
Width = 41
Height = 13
Caption = #21033#24687'% '
end
object Label31: TLabel
Left = 8
Top = 8
Width = 75
Height = 13
Caption = #20184#27454#26465#27454' '
end
object Shape33: TShape
Left = 8
Top = 205
Width = 129
Height = 1
Pen.Color = clWhite
end
object Label32: TLabel
Left = 8
Top = 190
Width = 42
Height = 13
Caption = #20998#34892' '
end
object Label34: TLabel
Left = 8
Top = 168
Width = 57
Height = 13
Caption = #31185#30446' '
end
object Shape34: TShape
Left = 8
Top = 185
Width = 129
Height = 1
Pen.Color = clWhite
end
object Shape35: TShape
Left = 8
Top = 145
Width = 129
Height = 1
Pen.Color = clWhite
end
object Shape36: TShape
Left = 8
Top = 165
Width = 129
Height = 1
Pen.Color = clWhite
end
object Label35: TLabel
Left = 8
Top = 150
Width = 39
Height = 13
Caption = #38134#34892' '
end
object Label36: TLabel
Left = 8
Top = 128
Width = 57
Height = 13
Caption = #38134#34892#22269#23478' '
end
object Label33: TLabel
Left = 288
Top = 8
Width = 87
Height = 13
Caption = #20449#29992#21345#31867#22411' '
Visible = False
end
object Shape32: TShape
Left = 288
Top = 25
Width = 129
Height = 1
Pen.Color = clWhite
Visible = False
end
object DBEdit18: TDBEdit
Left = 120
Top = 88
Width = 161
Height = 18
BorderStyle = bsNone
DataField = 'CreditLine'
DataSource = DataSource1
TabOrder = 0
end
object DBEdit23: TDBEdit
Left = 120
Top = 68
Width = 161
Height = 18
BorderStyle = bsNone
DataField = 'Discount'
DataSource = DataSource1
TabOrder = 1
end
object DBEdit24: TDBEdit
Left = 120
Top = 28
Width = 161
Height = 18
BorderStyle = bsNone
DataField = 'IntrstRate'
DataSource = DataSource1
TabOrder = 2
end
object DBEdit25: TDBEdit
Left = 120
Top = 48
Width = 161
Height = 18
BorderStyle = bsNone
DataField = 'ListNum'
DataSource = DataSource1
TabOrder = 3
end
object DBEdit26: TDBEdit
Left = 120
Top = 8
Width = 161
Height = 18
BorderStyle = bsNone
DataField = 'GroupNum'
DataSource = DataSource1
TabOrder = 4
end
object DBEdit28: TDBEdit
Left = 120
Top = 188
Width = 161
Height = 18
BorderStyle = bsNone
DataField = 'HousBnkBrn'
DataSource = DataSource1
TabOrder = 5
end
object DBEdit29: TDBEdit
Left = 120
Top = 148
Width = 161
Height = 18
BorderStyle = bsNone
DataField = 'HouseBank'
DataSource = DataSource1
TabOrder = 6
end
object DBEdit30: TDBEdit
Left = 120
Top = 168
Width = 161
Height = 18
BorderStyle = bsNone
DataField = 'HousBnkAct'
DataSource = DataSource1
TabOrder = 7
end
object DBEdit31: TDBEdit
Left = 120
Top = 128
Width = 161
Height = 18
BorderStyle = bsNone
DataField = 'HousBnkCry'
DataSource = DataSource1
TabOrder = 8
end
object DBCheckBox1: TDBCheckBox
Left = 8
Top = 216
Width = 97
Height = 17
Caption = #37096#20998#20132#36135
Ctl3D = True
DataField = 'PartDelivr'
DataSource = DataSource1
ParentCtl3D = False
TabOrder = 9
ValueChecked = 'True'
ValueUnchecked = 'False'
Visible = False
end
object DBComboBox4: TDBComboBox
Left = 408
Top = 7
Width = 153
Height = 21
BevelOuter = bvNone
BevelKind = bkFlat
DataField = 'CreditCard'
DataSource = DataSource1
ItemHeight = 13
TabOrder = 10
Visible = False
end
end
object TabSheet5: TTabSheet
Caption = ' '#36130#21153' '
ImageIndex = 4
object Label37: TLabel
Left = 8
Top = 80
Width = 75
Height = 13
Caption = #24212#25910#31185#30446' '
end
object Label38: TLabel
Left = 8
Top = 101
Width = 60
Height = 13
Caption = #32435#31246#29366#24577' '
end
object Shape37: TShape
Left = 8
Top = 117
Width = 129
Height = 1
Pen.Color = clWhite
end
object Shape38: TShape
Left = 8
Top = 97
Width = 129
Height = 1
Pen.Color = clWhite
end
object Label39: TLabel
Left = 8
Top = 120
Width = 60
Height = 13
Caption = #31246#25910#32452' '
end
object Shape40: TShape
Left = 8
Top = 137
Width = 129
Height = 1
Pen.Color = clWhite
end
object DBEdit27: TDBEdit
Left = 120
Top = 80
Width = 145
Height = 18
BorderStyle = bsNone
DataField = 'DebPayAcct'
DataSource = DataSource1
TabOrder = 0
end
object DBEdit33: TDBEdit
Left = 120
Top = 120
Width = 57
Height = 18
BorderStyle = bsNone
DataField = 'VatGroup'
DataSource = DataSource1
TabOrder = 1
end
object DBEdit34: TDBEdit
Left = 178
Top = 120
Width = 87
Height = 18
BorderStyle = bsNone
DataSource = DataSource1
TabOrder = 2
end
object DBComboBox5: TDBComboBox
Left = 119
Top = 98
Width = 148
Height = 21
BevelOuter = bvNone
BevelKind = bkFlat
DataSource = DataSource1
ItemHeight = 13
Items.Strings = (
#36131#20219
#26377#38480
#20010#20307)
TabOrder = 3
end
end
object TabSheet6: TTabSheet
Caption = ' '#26126#32454' '
ImageIndex = 5
object DBImage1: TDBImage
Left = 8
Top = 8
Width = 441
Height = 225
BorderStyle = bsNone
Ctl3D = True
DataField = 'Picture'
DataSource = DataSource1
ParentCtl3D = False
TabOrder = 0
end
end
end
object DBComboBox1: TDBComboBox
Left = 219
Top = 7
Width = 81
Height = 21
BevelOuter = bvNone
BevelKind = bkFlat
DataField = 'CardType'
DataSource = DataSource1
ItemHeight = 13
Items.Strings = (
#23458#25143
#20379#24212#21830)
TabOrder = 8
OnChange = DBComboBox1Change
end
object DataSource1: TDataSource
DataSet = ADOQuP3
OnDataChange = DataSource1DataChange
Left = 320
Top = 16
end
object ADOQuP3: TADOQuery
Parameters = <
item
Name = 'P0'
DataType = ftVariant
Value = 0c
end>
Left = 384
Top = 24
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -