📄 mc_sfyl.dfm
字号:
object SFYL: TSFYL
Left = 1
Top = 27
BorderStyle = bsToolWindow
Caption = #25910#36153#24773#20917#19968#35272#65306
ClientHeight = 395
ClientWidth = 630
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 12
object Bevel1: TBevel
Left = 1
Top = 510
Width = 790
Height = 9
Shape = bsTopLine
end
object Panel1: TPanel
Left = 6
Top = 8
Width = 781
Height = 499
BevelOuter = bvNone
Caption = 'Panel1'
TabOrder = 0
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 781
Height = 499
ActivePage = TabSheet1
Align = alClient
HotTrack = True
MultiLine = True
TabIndex = 0
TabOrder = 0
TabPosition = tpBottom
object TabSheet1: TTabSheet
Caption = #12304#27700#36153#12305
object DBGrid1: TDBGrid
Left = 4
Top = 2
Width = 764
Height = 464
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #27700#34920#32534#21495
Visible = True
end
item
Expanded = False
FieldName = #25143#20027#22995#21517
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = #19978#26376#35835#25968
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = #26412#26376#35835#25968
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = #20351#29992#25968
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = #24212#25910#37329#39069
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = #23454#25910#37329#39069
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = #21097#20313#37329#39069
Visible = True
end>
end
end
object TabSheet2: TTabSheet
Caption = #12304#30005#36153#12305
ImageIndex = 1
object DBGrid2: TDBGrid
Left = 4
Top = 2
Width = 764
Height = 464
DataSource = DataSource2
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #30005#34920#32534#21495
Visible = True
end
item
Expanded = False
FieldName = #25143#20027#22995#21517
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = #19978#26376#35835#25968
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = #26412#26376#35835#25968
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = #20351#29992#25968
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = #24212#25910#37329#39069
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = #23454#25910#37329#39069
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = #21097#20313#37329#39069
Visible = True
end>
end
end
object TabSheet3: TTabSheet
Caption = #12304#29028#27668#36153#12305
ImageIndex = 2
object DBGrid3: TDBGrid
Left = 4
Top = 2
Width = 764
Height = 464
DataSource = DataSource3
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #29028#27668#34920#32534#21495
Visible = True
end
item
Expanded = False
FieldName = #25143#20027#22995#21517
Visible = True
end
item
Expanded = False
FieldName = #19978#26376#35835#25968
Visible = True
end
item
Expanded = False
FieldName = #26412#26376#35835#25968
Visible = True
end
item
Expanded = False
FieldName = #20351#29992#25968
Visible = True
end
item
Expanded = False
FieldName = #24212#25910#37329#39069
Visible = True
end
item
Expanded = False
FieldName = #23454#25910#37329#39069
Visible = True
end
item
Expanded = False
FieldName = #21097#20313#37329#39069
Visible = True
end>
end
end
object TabSheet5: TTabSheet
Caption = #12304#24120#29992#36153#29992#12305
ImageIndex = 4
object StringGrid1: TStringGrid
Left = 4
Top = 2
Width = 764
Height = 464
ColCount = 2
DefaultColWidth = 11
DefaultRowHeight = 16
RowCount = 2
TabOrder = 0
end
end
object TabSheet4: TTabSheet
Caption = #12304#20854#23427#36153#29992#12305
ImageIndex = 4
object StringGrid2: TStringGrid
Left = 4
Top = 2
Width = 764
Height = 464
ColCount = 2
DefaultColWidth = 11
DefaultRowHeight = 16
RowCount = 2
TabOrder = 0
end
end
end
end
object BitBtn1: TBitBtn
Left = 4
Top = 518
Width = 205
Height = 25
Caption = #36873#25321#27983#35272#35268#21017'[&F]'
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = BitBtn1Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333444444
33333333333F8888883F33330000324334222222443333388F3833333388F333
000032244222222222433338F8833FFFFF338F3300003222222AAAAA22243338
F333F88888F338F30000322222A33333A2224338F33F8333338F338F00003222
223333333A224338F33833333338F38F00003222222333333A444338FFFF8F33
3338888300003AAAAAAA33333333333888888833333333330000333333333333
333333333333333333FFFFFF000033333333333344444433FFFF333333888888
00003A444333333A22222438888F333338F3333800003A2243333333A2222438
F38F333333833338000033A224333334422224338338FFFFF8833338000033A2
22444442222224338F3388888333FF380000333A2222222222AA243338FF3333
33FF88F800003333AA222222AA33A3333388FFFFFF8833830000333333AAAAAA
3333333333338888883333330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 214
Top = 518
Width = 187
Height = 25
Caption = #36864#20986#36153#29992#24773#20917#19968#35272'[&Q]'
TabOrder = 2
OnClick = BitBtn2Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333FFFFF333333000033333388888833333333333F888888FFF333
000033338811111188333333338833FFF388FF33000033381119999111833333
38F338888F338FF30000339119933331111833338F388333383338F300003391
13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
000039183811193333918338F8F833F83333838F000039118111933339118338
F3833F83333833830000339111193333391833338F33F8333FF838F300003391
11833338111833338F338FFFF883F83300003339111888811183333338FF3888
83FF83330000333399111111993333333388FFFFFF8833330000333333999999
3333333333338888883333330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object Query1: TQuery
DatabaseName = 'WYGL'
SQL.Strings = (
'Select * From '#27700#36153)
Left = 16
Top = 450
object Query1BDEDesigner: TStringField
FieldName = #27700#34920#32534#21495
Origin = 'WYGL.'#27700#36153'.'#27700#34920#32534#21495
FixedChar = True
end
object Query1BDEDesigner2: TStringField
FieldName = #25143#20027#22995#21517
Origin = 'WYGL.'#27700#36153'.'#25143#20027#22995#21517
FixedChar = True
Size = 10
end
object Query1BDEDesigner3: TStringField
FieldName = #25910#36153#26631#20934
Origin = 'WYGL.'#27700#36153'.'#25910#36153#26631#20934
FixedChar = True
end
object Query1BDEDesigner4: TFloatField
FieldName = #25910#36153#37329#39069
Origin = 'WYGL.'#27700#36153'.'#25910#36153#37329#39069
end
object Query1BDEDesigner5: TDateTimeField
FieldName = #35745#36153#36215#22987#26085#26399
Origin = 'WYGL.'#27700#36153'.'#35745#36153#36215#22987#26085#26399
end
object Query1BDEDesigner6: TDateTimeField
FieldName = #35745#36153#32456#27490#26085#26399
Origin = 'WYGL.'#27700#36153'.'#35745#36153#32456#27490#26085#26399
end
object Query1BDEDesigner7: TIntegerField
FieldName = #26412#26376#35835#25968
Origin = 'WYGL.'#27700#36153'.'#26412#26376#35835#25968
end
object Query1BDEDesigner8: TIntegerField
FieldName = #19978#26376#35835#25968
Origin = 'WYGL.'#27700#36153'.'#19978#26376#35835#25968
end
object Query1BDEDesigner9: TIntegerField
FieldName = #20351#29992#25968
Origin = 'WYGL.'#27700#36153'.'#20351#29992#25968
end
object Query1BDEDesigner10: TFloatField
FieldName = #24212#25910#37329#39069
Origin = 'WYGL.'#27700#36153'.'#24212#25910#37329#39069
end
object Query1BDEDesigner11: TFloatField
FieldName = #23454#25910#37329#39069
Origin = 'WYGL.'#27700#36153'.'#23454#25910#37329#39069
end
object Query1BDEDesigner12: TFloatField
FieldName = #21097#20313#37329#39069
Origin = 'WYGL.'#27700#36153'.'#21097#20313#37329#39069
end
end
object DataSource1: TDataSource
DataSet = Query1
Left = 16
Top = 418
end
object Query2: TQuery
DatabaseName = 'WYGL'
SQL.Strings = (
'Select * From '#30005#36153)
Left = 70
Top = 451
object Query2BDEDesigner: TStringField
FieldName = #30005#34920#32534#21495
Origin = 'WYGL.'#30005#36153'.'#30005#34920#32534#21495
FixedChar = True
end
object Query2BDEDesigner2: TStringField
FieldName = #25143#20027#22995#21517
Origin = 'WYGL.'#30005#36153'.'#25143#20027#22995#21517
FixedChar = True
Size = 10
end
object Query2BDEDesigner3: TStringField
FieldName = #25910#36153#26631#20934
Origin = 'WYGL.'#30005#36153'.'#25910#36153#26631#20934
FixedChar = True
end
object Query2BDEDesigner4: TFloatField
FieldName = #25910#36153#37329#39069
Origin = 'WYGL.'#30005#36153'.'#25910#36153#37329#39069
end
object Query2BDEDesigner5: TDateTimeField
FieldName = #35745#36153#36215#22987#26085#26399
Origin = 'WYGL.'#30005#36153'.'#35745#36153#36215#22987#26085#26399
end
object Query2BDEDesigner6: TDateTimeField
FieldName = #35745#36153#32456#27490#26085#26399
Origin = 'WYGL.'#30005#36153'.'#35745#36153#32456#27490#26085#26399
end
object Query2BDEDesigner7: TIntegerField
FieldName = #26412#26376#35835#25968
Origin = 'WYGL.'#30005#36153'.'#26412#26376#35835#25968
end
object Query2BDEDesigner8: TIntegerField
FieldName = #19978#26376#35835#25968
Origin = 'WYGL.'#30005#36153'.'#19978#26376#35835#25968
end
object Query2BDEDesigner9: TIntegerField
FieldName = #20351#29992#25968
Origin = 'WYGL.'#30005#36153'.'#20351#29992#25968
end
object Query2BDEDesigner10: TFloatField
FieldName = #24212#25910#37329#39069
Origin = 'WYGL.'#30005#36153'.'#24212#25910#37329#39069
end
object Query2BDEDesigner11: TFloatField
FieldName = #23454#25910#37329#39069
Origin = 'WYGL.'#30005#36153'.'#23454#25910#37329#39069
end
object Query2BDEDesigner12: TFloatField
FieldName = #21097#20313#37329#39069
Origin = 'WYGL.'#30005#36153'.'#21097#20313#37329#39069
end
end
object DataSource2: TDataSource
DataSet = Query2
Left = 71
Top = 418
end
object Query3: TQuery
DatabaseName = 'WYGL'
SQL.Strings = (
'Select * From '#29028#27668#36153)
Left = 138
Top = 451
end
object DataSource3: TDataSource
DataSet = Query3
Left = 138
Top = 419
end
object Query4: TQuery
DatabaseName = 'WYGL'
Left = 218
Top = 446
end
object Query5: TQuery
DatabaseName = 'WYGL'
Left = 290
Top = 446
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -