📄 thunit.dfm
字号:
TabOrder = 2
OnChange = edit1change
OnKeyDown = edit1keydown
OnKeyPress = edit1keypress
end
object Edit2: TEdit
Left = 3
Top = 214
Width = 121
Height = 27
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
OnChange = edit2change
OnKeyDown = edit2keydown
OnKeyPress = edti2keypress
end
object Edit3: TEdit
Left = 3
Top = 275
Width = 121
Height = 27
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
OnKeyDown = edit3keydown
OnKeyPress = edit3keypress
end
object ComboBox2: TComboBox
Left = 3
Top = 337
Width = 123
Height = 27
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 19
ParentFont = False
TabOrder = 5
Text = #24211#23384
OnKeyDown = combobox2keydown
end
object Edit4: TEdit
Left = 3
Top = 397
Width = 121
Height = 27
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
OnKeyDown = edit4keydown
end
object Button1: TButton
Left = 22
Top = 440
Width = 85
Height = 25
Caption = '---->'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #21326#25991#24425#20113
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = Button1Click
end
object Button2: TButton
Left = 22
Top = 478
Width = 85
Height = 28
Caption = '<----'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #21326#25991#24425#20113
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnClick = Button2Click
end
end
end
end
object TabSheet2: TTabSheet
Caption = #19979#23646#37096#38376#36864#22238
ImageIndex = 1
object Panel7: TPanel
Left = 0
Top = 0
Width = 811
Height = 531
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object Panel8: TPanel
Left = 2
Top = 2
Width = 303
Height = 527
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object DBGridEh4: TDBGridEh
Left = 2
Top = 2
Width = 299
Height = 193
Align = alTop
DataSource = DMData.BmDataSource
Flat = False
FooterColor = clWindow
FooterFont.Charset = ANSI_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -19
FooterFont.Name = #23435#20307
FooterFont.Style = []
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -19
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnCellClick = dbgrideh4cellclick
Columns = <
item
Alignment = taCenter
EditButtons = <>
FieldName = 'km'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #31185#30446
Width = 91
end
item
Alignment = taCenter
EditButtons = <>
FieldName = 'dwbm'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #36864#22238#37096#38376
Width = 150
end>
end
object DBGridEh5: TDBGridEh
Left = 2
Top = 195
Width = 299
Height = 330
Align = alClient
DataSource = DMData.thkqDataSource
Flat = False
FooterColor = clWindow
FooterFont.Charset = ANSI_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -19
FooterFont.Name = #23435#20307
FooterFont.Style = []
TabOrder = 1
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -19
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnCellClick = dbgrideh5cellclick
Columns = <
item
EditButtons = <>
FieldName = 'ql'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #31080#25454#31181#31867
Width = 110
end
item
Alignment = taCenter
EditButtons = <>
FieldName = 'sl'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #25968#37327
Width = 55
end
item
Alignment = taCenter
EditButtons = <>
FieldName = 'qxhm'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #36215#22987#21495#30721
Width = 88
end
item
Alignment = taCenter
EditButtons = <>
FieldName = 'jxhm'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #32467#26463#21495#30721
Width = 96
end>
end
end
object Panel9: TPanel
Left = 305
Top = 2
Width = 129
Height = 527
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object Label8: TLabel
Left = 3
Top = 10
Width = 95
Height = 19
Caption = #31080#25454#31181#31867#65306
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 3
Top = 68
Width = 95
Height = 19
Caption = #36864#22238#26085#26399#65306
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 3
Top = 127
Width = 86
Height = 19
Caption = #36864#22238#25968#37327':'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 3
Top = 187
Width = 95
Height = 19
Caption = #36215#22987#21495#30721#65306
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -