📄 mc_fwxxscq.dfm
字号:
object FWXXSCQ: TFWXXSCQ
Left = 228
Top = 81
Hint = #25151#23627#20449#24687#29983#25104#22120#65306
BorderStyle = bsToolWindow
Caption = #25151#23627#20449#24687#29983#25104#22120#65306
ClientHeight = 335
ClientWidth = 439
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
ShowHint = True
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object GroupBox1: TGroupBox
Left = 5
Top = 4
Width = 212
Height = 53
Caption = #23567#21306#21015#34920#65306
TabOrder = 0
object Label1: TLabel
Left = 10
Top = 25
Width = 48
Height = 12
Caption = #23567#21306#21517#65306
end
object DBLookupComboBox1: TDBLookupComboBox
Left = 62
Top = 21
Width = 138
Height = 20
KeyField = #23567#21306#21517
ListField = #23567#21306#21517
ListSource = DataSource1
TabOrder = 0
end
end
object GroupBox2: TGroupBox
Left = 5
Top = 61
Width = 213
Height = 267
Caption = #22823#27004#21015#34920#65306
TabOrder = 1
object DBGrid1: TDBGrid
Left = 8
Top = 18
Width = 196
Height = 241
DataSource = DataSource2
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #22823#27004#21517#31216
Width = 160
Visible = True
end>
end
end
object GroupBox3: TGroupBox
Left = 224
Top = 4
Width = 209
Height = 323
Caption = #25151#23627#20449#24687#27169#29256#65306
TabOrder = 2
object Bevel1: TBevel
Left = 1
Top = 98
Width = 207
Height = 7
Shape = bsTopLine
end
object Label11: TLabel
Left = 8
Top = 233
Width = 60
Height = 12
Caption = #25151#38388#31867#21035#65306
end
object Label12: TLabel
Left = 8
Top = 204
Width = 60
Height = 12
Caption = #37197#22791#35774#26045#65306
end
object Label9: TLabel
Left = 8
Top = 174
Width = 60
Height = 12
Caption = #25151#38388#32467#26500#65306
end
object Label7: TLabel
Left = 8
Top = 145
Width = 60
Height = 12
Caption = #26435#23646#31867#22411#65306
end
object Label8: TLabel
Left = 8
Top = 116
Width = 36
Height = 12
Caption = #26397#21521#65306
end
object Bevel2: TBevel
Left = 1
Top = 282
Width = 207
Height = 7
Shape = bsTopLine
end
object Bevel3: TBevel
Left = 1
Top = 256
Width = 207
Height = 7
Shape = bsTopLine
end
object Label4: TLabel
Left = 40
Top = 264
Width = 132
Height = 12
Caption = #19975#36890#33457#22253#25151#23627#20449#24687#29983#25104#22120
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 8
Top = 24
Width = 36
Height = 12
Caption = #21333#20803#65306
end
object Label6: TLabel
Left = 127
Top = 24
Width = 12
Height = 12
Caption = #21040
end
object Label10: TLabel
Left = 8
Top = 50
Width = 48
Height = 12
Caption = #27004#23618#25968#65306
end
object Label13: TLabel
Left = 9
Top = 74
Width = 60
Height = 12
Caption = #27599#23618#25143#25968#65306
end
object DBLookupComboBox2: TDBLookupComboBox
Left = 67
Top = 112
Width = 129
Height = 20
KeyField = #25151#23627#26397#21521
ListField = #25151#23627#26397#21521
ListSource = DataSource3
TabOrder = 0
end
object DBLookupComboBox3: TDBLookupComboBox
Left = 67
Top = 141
Width = 129
Height = 20
KeyField = #26435#23646#31867#22411
ListField = #26435#23646#31867#22411
ListSource = DataSource4
TabOrder = 1
end
object DBLookupComboBox4: TDBLookupComboBox
Left = 67
Top = 170
Width = 129
Height = 20
KeyField = #25151#38388#32467#26500
ListField = #25151#38388#32467#26500
ListSource = DataSource5
TabOrder = 2
end
object DBLookupComboBox5: TDBLookupComboBox
Left = 67
Top = 200
Width = 129
Height = 20
KeyField = #37197#22791#20449#24687
ListField = #37197#22791#20449#24687
ListSource = DataSource6
TabOrder = 3
end
object DBLookupComboBox6: TDBLookupComboBox
Left = 67
Top = 229
Width = 129
Height = 20
KeyField = #25151#38388#31867#21035
ListField = #25151#38388#31867#21035
ListSource = DataSource7
TabOrder = 4
end
object BitBtn1: TBitBtn
Left = 6
Top = 291
Width = 97
Height = 25
Hint = #24320#22987#29983#25104
Caption = #30830#23450'[&O]'
TabOrder = 5
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 = 105
Top = 291
Width = 97
Height = 25
Hint = #36864#20986
Caption = #36864#20986'[&Q]'
TabOrder = 6
OnClick = BitBtn2Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333FFFFF333333000033333388888833333333333F888888FFF333
000033338811111188333333338833FFF388FF33000033381119999111833333
38F338888F338FF30000339119933331111833338F388333383338F300003391
13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
000039183811193333918338F8F833F83333838F000039118111933339118338
F3833F83333833830000339111193333391833338F33F8333FF838F300003391
11833338111833338F338FFFF883F83300003339111888811183333338FF3888
83FF83330000333399111111993333333388FFFFFF8833330000333333999999
3333333333338888883333330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object Edit3: TEdit
Left = 72
Top = 20
Width = 35
Height = 20
TabOrder = 7
Text = '1'
end
object UpDown3: TUpDown
Left = 107
Top = 20
Width = 17
Height = 20
Associate = Edit3
Min = 1
Max = 999
Position = 1
TabOrder = 8
Wrap = False
end
object Edit4: TEdit
Left = 144
Top = 20
Width = 42
Height = 20
TabOrder = 9
Text = '7'
end
object UpDown4: TUpDown
Left = 186
Top = 20
Width = 17
Height = 20
Associate = Edit4
Min = 1
Max = 999
Position = 7
TabOrder = 10
Wrap = False
end
object Edit5: TEdit
Left = 72
Top = 46
Width = 113
Height = 20
TabOrder = 11
Text = '7'
end
object UpDown5: TUpDown
Left = 185
Top = 46
Width = 17
Height = 20
Associate = Edit5
Min = 1
Max = 999
Position = 7
TabOrder = 12
Wrap = False
end
object Edit6: TEdit
Left = 72
Top = 70
Width = 113
Height = 20
TabOrder = 13
Text = '3'
end
object UpDown6: TUpDown
Left = 185
Top = 70
Width = 17
Height = 20
Associate = Edit6
Min = 1
Max = 999
Position = 3
TabOrder = 14
Wrap = False
end
end
object DataSource1: TDataSource
DataSet = Query1
Left = 77
Top = 20
end
object Query1: TQuery
Active = True
DatabaseName = 'WYGL'
SQL.Strings = (
'Select '#23567#21306#32534#21495','#23567#21306#21517' From '#23567#21306#20449#24687#34920)
Left = 117
Top = 20
object Query1BDEDesigner: TStringField
FieldName = #23567#21306#32534#21495
Origin = 'WYGL.'#23567#21306#20449#24687#34920'.'#23567#21306#32534#21495
FixedChar = True
Size = 10
end
object Query1BDEDesigner2: TStringField
FieldName = #23567#21306#21517
Origin = 'WYGL.'#23567#21306#20449#24687#34920'.'#23567#21306#21517
FixedChar = True
Size = 10
end
end
object Table1: TTable
Active = True
DatabaseName = 'WYGL'
IndexFieldNames = #25152#23646#21306#22495
MasterFields = #23567#21306#21517
MasterSource = DataSource1
TableName = 'dbo.'#22823#27004#20449#24687#34920
Left = 125
Top = 93
object Table1BDEDesigner: TStringField
FieldName = #22823#27004#32534#21495
Required = True
FixedChar = True
Size = 10
end
object Table1BDEDesigner2: TStringField
FieldName = #22823#27004#21517#31216
FixedChar = True
end
object Table1BDEDesigner3: TStringField
FieldName = #25152#23646#21306#22495
FixedChar = True
end
end
object DataSource2: TDataSource
DataSet = Table1
Left = 85
Top = 93
end
object DataSource3: TDataSource
DataSet = Query2
Left = 296
Top = 162
end
object Query2: TQuery
Active = True
DatabaseName = 'WYGL'
SQL.Strings = (
'Select * From '#26397#21521)
Left = 328
Top = 162
object Query2BDEDesigner: TStringField
FieldName = #25151#23627#26397#21521
Origin = 'WYGL.'#26397#21521'.'#25151#23627#26397#21521
FixedChar = True
end
end
object DataSource4: TDataSource
DataSet = Query3
Left = 296
Top = 195
end
object Query3: TQuery
Active = True
DatabaseName = 'WYGL'
SQL.Strings = (
'Select * From '#26435#23646#31867#22411)
Left = 328
Top = 195
object Query3BDEDesigner: TStringField
FieldName = #26435#23646#31867#22411
Origin = 'WYGL.'#26435#23646#31867#22411'.'#26435#23646#31867#22411
FixedChar = True
end
end
object DataSource5: TDataSource
DataSet = Query4
Left = 296
Top = 223
end
object Query4: TQuery
Active = True
DatabaseName = 'WYGL'
SQL.Strings = (
'Select * From '#25151#38388#32467#26500)
Left = 328
Top = 223
object Query4BDEDesigner: TStringField
FieldName = #25151#38388#32467#26500
Origin = 'WYGL.'#25151#38388#32467#26500'.'#25151#38388#32467#26500
FixedChar = True
end
end
object DataSource6: TDataSource
DataSet = Query5
Left = 296
Top = 253
end
object Query5: TQuery
Active = True
DatabaseName = 'WYGL'
SQL.Strings = (
'Select * From '#37197#22791#20449#24687)
Left = 328
Top = 253
object Query5BDEDesigner: TStringField
FieldName = #37197#22791#20449#24687
Origin = 'WYGL.'#37197#22791#20449#24687'.'#37197#22791#20449#24687
FixedChar = True
Size = 30
end
end
object DataSource7: TDataSource
DataSet = Query6
Left = 296
Top = 283
end
object Query6: TQuery
Active = True
DatabaseName = 'WYGL'
SQL.Strings = (
'Select * From '#25151#38388#31867#21035)
Left = 328
Top = 283
object Query6BDEDesigner: TStringField
FieldName = #25151#38388#31867#21035
Origin = 'WYGL.'#25151#38388#31867#21035'.'#25151#38388#31867#21035
FixedChar = True
end
end
object Query7: TQuery
DatabaseName = 'WYGL'
Left = 224
Top = 212
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -