📄 easygas_buttlelist.dfm
字号:
object BUTTLELIST: TBUTTLELIST
Left = 243
Top = 157
Width = 696
Height = 480
Caption = #38050#29942#21015#34920
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDefault
Visible = True
WindowState = wsMaximized
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 12
object DBG: TDBGridEh
Left = 0
Top = 53
Width = 688
Height = 400
Align = alClient
AllowedOperations = [alopUpdateEh]
Color = clBtnFace
ColumnDefValues.Title.TitleButton = True
DataSource = MAINS
Flat = True
FooterColor = clWindow
FooterFont.Charset = GB2312_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -12
FooterFont.Name = 'MS Sans Serif'
FooterFont.Style = []
FooterRowCount = 1
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
OptionsEh = [dghFixed3D, dghClearSelection, dghAutoSortMarking, dghDialogFind]
ReadOnly = True
SumList.Active = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnDblClick = DBGDblClick
OnTitleBtnClick = DBGTitleBtnClick
end
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 688
Height = 53
AutoSize = True
ButtonHeight = 51
ButtonWidth = 55
Caption = 'ToolBar1'
Flat = True
Images = MAINFORM.BIGICON
ShowCaptions = True
TabOrder = 1
object ToolButton2: TToolButton
Left = 0
Top = 0
Action = CreateTick
end
object ToolButton1: TToolButton
Left = 55
Top = 0
Action = TicksInfo
end
object ToolButton3: TToolButton
Left = 110
Top = 0
Action = DelTick
end
object ToolButton4: TToolButton
Left = 165
Top = 0
Width = 8
Caption = 'ToolButton4'
ImageIndex = 8
Style = tbsSeparator
end
object Panel1: TPanel
Left = 173
Top = 0
Width = 185
Height = 51
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object Edit1: TEdit
Left = 16
Top = 16
Width = 149
Height = 20
TabOrder = 0
OnKeyDown = Edit1KeyDown
end
end
end
object ActionList1: TActionList
Images = MAINFORM.BIGICON
Left = 336
Top = 228
object CreateTick: TAction
Caption = #24320#31649#29702#21333
ImageIndex = 29
OnExecute = CreateTickExecute
end
object TicksInfo: TAction
Caption = #21333#25454#26126#32454
ImageIndex = 3
OnExecute = TicksInfoExecute
end
object DelTick: TAction
Caption = #21024#38500#31080#25454
ImageIndex = 7
OnExecute = DelTickExecute
OnUpdate = DelTickUpdate
end
end
object MAIN: TADODataSet
Connection = MAINFORM.ADOC
CursorType = ctStatic
CommandText = 'select * from GAS_BOTTLE'
Parameters = <>
Left = 272
Top = 228
end
object MAINS: TDataSource
DataSet = MAIN
Left = 304
Top = 228
end
object DELS: TADODataSet
Connection = MAINFORM.ADOC
BeforeDelete = DELSBeforeDelete
Parameters = <>
Left = 240
Top = 228
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -