📄 easygas_sell.dfm
字号:
object SellDlg: TSellDlg
Left = 291
Top = 143
BorderStyle = bsDialog
Caption = #36827#36135'/'#38144#21806#21333
ClientHeight = 218
ClientWidth = 320
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnKeyDown = FormKeyDown
PixelsPerInch = 96
TextHeight = 12
object Bevel2: TBevel
Left = 144
Top = 12
Width = 173
Height = 153
Shape = bsFrame
end
object Bevel1: TBevel
Left = 4
Top = 12
Width = 137
Height = 153
Shape = bsFrame
end
object Label1: TLabel
Left = 152
Top = 124
Width = 24
Height = 12
Caption = #21512#35745
end
object Label2: TLabel
Left = 12
Top = 16
Width = 48
Height = 12
Caption = #21333#25454#31867#22411
end
object Label4: TLabel
Left = 12
Top = 52
Width = 48
Height = 12
Caption = #23458#25143#31867#21035
end
object DBText1: TDBText
Left = 64
Top = 52
Width = 42
Height = 12
AutoSize = True
DataField = #22791#27880
DataSource = CLIENTS
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 12
Top = 92
Width = 66
Height = 12
Caption = #21333#20215'['#20803'/KG]'
FocusControl = N1
end
object Label6: TLabel
Left = 80
Top = 92
Width = 48
Height = 12
Caption = #25968#37327'[KG]'
FocusControl = N2
end
object Label3: TLabel
Left = 12
Top = 128
Width = 24
Height = 12
Caption = #38134#34892
FocusControl = N1
end
object DBText2: TDBText
Left = 208
Top = 20
Width = 42
Height = 12
AutoSize = True
DataField = #38050#29942#32534#30721
DataSource = SELLTICKS
end
object Label7: TLabel
Left = 152
Top = 20
Width = 48
Height = 12
Caption = #38050#29942#32534#30721
end
object DBText3: TDBText
Left = 208
Top = 36
Width = 42
Height = 12
AutoSize = True
DataField = #38050#29942#31867#22411
DataSource = SELLTICKS
end
object Label8: TLabel
Left = 152
Top = 36
Width = 48
Height = 12
Caption = #38050#29942#31867#22411
end
object DBText4: TDBText
Left = 208
Top = 52
Width = 42
Height = 12
AutoSize = True
DataField = #32534#21495
DataSource = SELLTICKS
end
object Label9: TLabel
Left = 152
Top = 52
Width = 48
Height = 12
Caption = #21333#25454#32534#21495
end
object DBLookupComboboxEh1: TDBLookupComboboxEh
Left = 12
Top = 32
Width = 121
Height = 18
DataField = #21333#25454#31867#22411
DataSource = SELLTICKS
EditButtons = <>
Flat = True
KeyField = #21333#25454#31867#22411
ListField = #21333#25454#31867#22411
ListSource = SELLTYPES
TabOrder = 0
Visible = True
OnChange = DBLookupComboboxEh1Change
OnKeyDown = FormKeyDown
end
object BitBtn1: TBitBtn
Left = 88
Top = 176
Width = 75
Height = 25
Caption = #30830#23450
ModalResult = 1
TabOrder = 5
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 172
Top = 176
Width = 75
Height = 25
Caption = #21462#28040
TabOrder = 6
Kind = bkCancel
end
object DBLookupComboboxEh3: TDBLookupComboboxEh
Left = 12
Top = 68
Width = 121
Height = 18
DataField = #23458#25143#31867#22411
DataSource = SELLTICKS
EditButtons = <>
Flat = True
KeyField = #23458#25143#31867#22411
ListField = #23458#25143#31867#22411
ListSource = CLIENTS
TabOrder = 1
Visible = True
OnKeyDown = FormKeyDown
end
object N1: TDBNumberEditEh
Left = 12
Top = 108
Width = 65
Height = 18
DataField = #21333#20215
DataSource = SELLTICKS
EditButton.Visible = True
EditButtons = <>
Flat = True
TabOrder = 2
Visible = True
OnChange = N1Change
OnKeyDown = FormKeyDown
end
object N2: TDBNumberEditEh
Left = 80
Top = 108
Width = 53
Height = 18
DataField = #25968#37327
DataSource = SELLTICKS
EditButton.Visible = True
EditButtons = <>
Flat = True
TabOrder = 3
Visible = True
OnChange = N1Change
OnKeyDown = FormKeyDown
end
object DBLookupComboboxEh4: TDBLookupComboboxEh
Left = 12
Top = 144
Width = 121
Height = 18
DataField = #38134#34892#21517#31216
DataSource = SELLTICKS
EditButtons = <>
Flat = True
KeyField = #38134#34892#21517#31216
ListField = #38134#34892#21517#31216
ListSource = BANKS
TabOrder = 4
Visible = True
OnChange = DBLookupComboboxEh4Change
OnKeyDown = FormKeyDown
end
object SELLTICK: TADODataSet
Connection = MAINFORM.ADOC
OnNewRecord = SELLTICKNewRecord
CommandText = 'select * from GAS_SELL'
Parameters = <>
Left = 100
Top = 208
end
object SELLTICKS: TDataSource
DataSet = SELLTICK
Left = 128
Top = 208
end
object SELLTYPES: TDataSource
DataSet = SELLTYPE
Left = 60
Top = 208
end
object SELLTYPE: TADODataSet
Connection = MAINFORM.ADOC
CommandText = 'select * from BASE_SELLTYPE'
Parameters = <>
Left = 28
Top = 208
end
object CLIENTS: TDataSource
DataSet = CLIENT
Left = 272
Top = 208
end
object CLIENT: TADODataSet
Connection = MAINFORM.ADOC
CommandText = 'select * from BASE_CLIENTTYPE'
Parameters = <>
Left = 240
Top = 208
end
object BANKS: TDataSource
DataSet = BANK
Left = 288
Top = 176
end
object BANK: TADODataSet
Connection = MAINFORM.ADOC
CommandText = 'select * from GAS_BANK'
Parameters = <>
Left = 256
Top = 176
end
object BUTTLETYPE: TADODataSet
Connection = MAINFORM.ADOC
CommandText = 'select * from GAS_BOTTLE_TYPE'
Parameters = <>
Left = 12
Top = 172
end
object BUTTLETYPES: TDataSource
DataSet = BUTTLETYPE
Left = 44
Top = 172
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -