?? viewlesseeunit.dfm
字號:
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
Align = alLeft
AutoFitColWidths = True
DataSource = DataSource1
Flat = True
FooterColor = clWindow
FooterFont.Charset = ANSI_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -13
FooterFont.Name = #23435#20307
FooterFont.Style = []
ImeName = #19975#33021#20116#31508'EXE'#22806#25346#29256
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 2
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnCellClick = DBGridEh1CellClick
Columns = <
item
EditButtons = <>
FieldName = #20844#21496#21517#31216
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end>
end
object DBGridEh2: TDBGridEh
Left = 164
Top = 83
Width = 716
Height = 485
FixGridlinecolor = clGray
Gridlinecolor = clGray
FooterDisplayStyle = False
ShowBmp = False
UseMenu = True
RowColorFlag = 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
Align = alClient
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]
TabOrder = 3
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDblClick = DBGridEh2DblClick
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 = #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 = #31867#22411
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #20986#29983#26085#26399
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #32852#31995#30005#35805
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #30005#23376#37038#31665
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 = #26376#25910#20837
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end
item
EditButtons = <>
FieldName = #30331#35760#26085#26399
Footers = <>
DisplayNullIfZero = False
IsCurrency = False
end>
end
object ADOQuery2: TADOQuery
Connection = DataModule2.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'SELECT * from '#31199#25143#20449#24687#34920)
Left = 196
Top = 208
end
object DataSource2: TDataSource
DataSet = ADOQuery2
Left = 194
Top = 240
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 58
Top = 203
end
object ADOQuery1: TADOQuery
Connection = DataModule2.ADOConnection1
CursorType = ctStatic
AfterScroll = ADOQuery1AfterScroll
Parameters = <>
SQL.Strings = (
'SELECT '#20844#21496#21517#31216','#20844#21496#32534#21495' from '#20844#21496#20449#24687#34920)
Left = 57
Top = 238
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -