📄 main.dfm
字号:
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnCellClick = DBGridPostIncGroupCellClick
OnDblClick = DBGridPostIncGroupDblClick
OnKeyDown = DBGridPostIncGroupKeyDown
Columns = <
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #24050#21253#21547#30340#26435#38480#32452
Width = 110
Visible = True
end
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #25551#36848
Width = 125
Visible = True
end>
end
object DBGridPostExGroup: TDBGrid
Left = 312
Top = 15
Width = 242
Height = 211
Align = alRight
DataSource = DM.DSPostExGroup
ImeName = #32043#20809#25340#38899#36755#20837#27861
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clBlack
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnCellClick = DBGridPostExGroupCellClick
OnDblClick = DBGridPostExGroupDblClick
OnKeyDown = DBGridPostExGroupKeyDown
Columns = <
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #19981#21253#21547#30340#26435#38480#32452
Width = 110
Visible = True
end
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #25551#36848
Width = 125
Visible = True
end>
end
end
object GroupBox5: TGroupBox
Left = 0
Top = 228
Width = 556
Height = 260
Align = alClient
Caption = #21487#25805#20316#26435#38480
TabOrder = 1
object DBGridPostIncPur: TDBGrid
Left = 2
Top = 15
Width = 552
Height = 243
Align = alClient
DataSource = DM.DSPostIncPur
ImeName = #32043#20809#25340#38899#36755#20837#27861
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clBlack
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #24050#21253#21547#30340#26435#38480
Width = 200
Visible = True
end
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #25551#36848
Width = 310
Visible = True
end>
end
end
end
object Panel5: TPanel
Left = 0
Top = 0
Width = 260
Height = 488
Align = alLeft
BevelOuter = bvNone
ParentColor = True
TabOrder = 1
object Panel7: TPanel
Left = 0
Top = 0
Width = 260
Height = 54
Align = alTop
BevelOuter = bvNone
ParentColor = True
TabOrder = 0
object BtnNewPost: TButton
Left = 26
Top = 13
Width = 81
Height = 27
Caption = #26032#24314#35282#33394
TabOrder = 0
OnClick = BtnNewPostClick
end
object BtnDelPost: TButton
Left = 143
Top = 13
Width = 81
Height = 27
Caption = #21024#38500#35282#33394
TabOrder = 1
OnClick = BtnDelPostClick
end
end
object DBGridPost: TDBGrid
Left = 0
Top = 54
Width = 260
Height = 434
Align = alClient
DataSource = DM.DSPost
ImeName = #32043#20809#25340#38899#36755#20837#27861
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clBlack
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDblClick = DBGridPostDblClick
Columns = <
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #23703#20301#21517
Width = 100
Visible = True
end
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #25551#36848
Width = 121
Visible = True
end>
end
end
end
object TabSheetGroup: TTabSheet
Caption = #26435#38480#32452#31649#29702
ImageIndex = 2
object Splitter3: TSplitter
Left = 260
Top = 0
Height = 488
end
object Panel9: TPanel
Left = 0
Top = 0
Width = 260
Height = 488
Align = alLeft
BevelOuter = bvNone
ParentColor = True
TabOrder = 0
object Panel11: TPanel
Left = 0
Top = 0
Width = 260
Height = 54
Align = alTop
BevelOuter = bvNone
ParentColor = True
TabOrder = 0
object BtnNewGroup: TButton
Left = 26
Top = 13
Width = 81
Height = 27
Caption = #26032#24314#26435#38480#32452
TabOrder = 0
OnClick = BtnNewGroupClick
end
object BtnDelGroup: TButton
Left = 143
Top = 13
Width = 81
Height = 27
Caption = #21024#38500#26435#38480#32452
TabOrder = 1
OnClick = BtnDelGroupClick
end
end
object DBGridGroup: TDBGrid
Left = 0
Top = 54
Width = 260
Height = 434
Align = alClient
DataSource = DM.DSGroup
ImeName = #32043#20809#25340#38899#36755#20837#27861
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clBlack
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDblClick = DBGridGroupDblClick
Columns = <
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #26435#38480#32452#21517
Width = 100
Visible = True
end
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #25551#36848
Width = 121
Visible = True
end>
end
end
object Panel10: TPanel
Left = 263
Top = 0
Width = 556
Height = 488
Align = alClient
BevelOuter = bvNone
ParentColor = True
TabOrder = 1
object Panel12: TPanel
Left = 260
Top = 0
Width = 36
Height = 488
Align = alClient
BevelOuter = bvNone
ParentColor = True
TabOrder = 0
object SpeedButton5: TSpeedButton
Left = 8
Top = 130
Width = 25
Height = 24
Caption = '<'
OnClick = SpeedButton5Click
end
object SpeedButton6: TSpeedButton
Left = 8
Top = 208
Width = 25
Height = 24
Caption = '>'
OnClick = SpeedButton6Click
end
end
object DBGridGroupIncPur: TDBGrid
Left = 0
Top = 0
Width = 260
Height = 488
Align = alLeft
DataSource = DM.DSGroupIncPur
ImeName = #32043#20809#25340#38899#36755#20837#27861
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clBlack
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnCellClick = DBGridGroupIncPurCellClick
OnDblClick = DBGridGroupIncPurDblClick
OnKeyDown = DBGridGroupIncPurKeyDown
Columns = <
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #24050#21253#21547#30340#26435#38480
Width = 110
Visible = True
end
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #25551#36848
Width = 125
Visible = True
end>
end
object DBGridGroupExPur: TDBGrid
Left = 296
Top = 0
Width = 260
Height = 488
Align = alRight
DataSource = DM.DSGroupExPur
ImeName = #32043#20809#25340#38899#36755#20837#27861
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clBlack
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnCellClick = DBGridGroupExPurCellClick
OnDblClick = DBGridGroupExPurDblClick
OnKeyDown = DBGridGroupExPurKeyDown
Columns = <
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #19981#21253#21547#30340#26435#38480
Width = 110
Visible = True
end
item
Expanded = False
Title.Alignment = taCenter
Title.Caption = #25551#36848
Width = 125
Visible = True
end>
end
end
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -