📄 editworkerunit.dfm
字号:
end
object DBGridEh1: TDBGridEh
Left = 25
Top = 208
Width = 824
Height = 105
FixGridlinecolor = clGray
Gridlinecolor = clGray
FooterDisplayStyle = False
ShowBmp = False
UseMenu = True
RowTwoColor = clSkyBlue
CurDeciNumber = 2
CurShowNegativeFont = True
CurShowNegativeColor = False
CurShowNegativeSign = False
CurDeciSeparatColor = clRed
CurrencySymBol = #65509
CurrencySymBolAlained = False
CurGridLineColor = clSilver
CurGridLineWidth = 1
CurKilobitColor = clGreen
CurrencyFont.Charset = DEFAULT_CHARSET
CurrencyFont.Color = clWindowText
CurrencyFont.Height = -11
CurrencyFont.Name = 'MS Sans Serif'
CurrencyFont.Style = []
CurNegativeFont.Charset = DEFAULT_CHARSET
CurNegativeFont.Color = clRed
CurNegativeFont.Height = -11
CurNegativeFont.Name = 'MS Sans Serif'
CurNegativeFont.Style = []
CurNegativeColor = clRed
CurTextLayout = tlCenter
CurZeroEmpty = True
DataSource = DataSource1
Flat = True
FooterColor = clWindow
FooterFont.Charset = ANSI_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -13
FooterFont.Name = #23435#20307
FooterFont.Style = []
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
RowSizingAllowed = True
TabOrder = 9
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
EditButtons = <>
FieldName = #23458#25143#32534#21495
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #22995#21517
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #23458#25143#31867#22411
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #24615#21035
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #22269#31821
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #36523#20221#35777#21495
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #30331#35760#26085#26399
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #32852#31995#30005#35805
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #32852#31995#22320#22336
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #37038#25919#32534#30721
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #30005#23376#20449#31665
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end>
end
object DBGridEh2: TDBGridEh
Left = 25
Top = 336
Width = 824
Height = 105
FixGridlinecolor = clGray
Gridlinecolor = clGray
FooterDisplayStyle = False
ShowBmp = False
UseMenu = True
RowTwoColor = clSkyBlue
CurDeciNumber = 2
CurShowNegativeFont = True
CurShowNegativeColor = False
CurShowNegativeSign = False
CurDeciSeparatColor = clRed
CurrencySymBol = #65509
CurrencySymBolAlained = False
CurGridLineColor = clSilver
CurGridLineWidth = 1
CurKilobitColor = clGreen
CurrencyFont.Charset = DEFAULT_CHARSET
CurrencyFont.Color = clWindowText
CurrencyFont.Height = -11
CurrencyFont.Name = 'MS Sans Serif'
CurrencyFont.Style = []
CurNegativeFont.Charset = DEFAULT_CHARSET
CurNegativeFont.Color = clRed
CurNegativeFont.Height = -11
CurNegativeFont.Name = 'MS Sans Serif'
CurNegativeFont.Style = []
CurNegativeColor = clRed
CurTextLayout = tlCenter
CurZeroEmpty = True
DataSource = DataSource2
Flat = True
FooterColor = clWindow
FooterFont.Charset = ANSI_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -13
FooterFont.Name = #23435#20307
FooterFont.Style = []
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
RowSizingAllowed = True
TabOrder = 10
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
EditButtons = <>
FieldName = #20986#31199#25143#32534#21495
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #22995#21517
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #31867#22411
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #24615#21035
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #22269#31821
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #36523#20221#35777#21495
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #30331#35760#26085#26399
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #32852#31995#30005#35805
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #32852#31995#22320#22336
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #37038#25919#32534#30721
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #30005#23376#37038#31665
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end>
end
object ADOQuery1: TADOQuery
Connection = DataModule2.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#23458#25143#20449#24687#34920)
Left = 50
Top = 266
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 81
Top = 277
end
object ADOQuery2: TADOQuery
Connection = DataModule2.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#31199#25143#20449#24687#34920)
Left = 42
Top = 410
end
object DataSource2: TDataSource
DataSet = ADOQuery2
Left = 73
Top = 421
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -