📄 mc_dlxxscq.dfm
字号:
object DLXXSCQ: TDLXXSCQ
Left = 432
Top = 282
Hint = #22823#27004#20449#24687#29983#25104#22120
BorderStyle = bsToolWindow
Caption = #22823#27004#20449#24687#29983#25104#22120#65306
ClientHeight = 248
ClientWidth = 228
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 = 4
Top = 4
Width = 219
Height = 49
Caption = #36873#25321#23567#21306#65306
TabOrder = 0
object Label1: TLabel
Left = 8
Top = 22
Width = 48
Height = 12
Caption = #23567#21306#21517#65306
end
object DBLookupComboBox1: TDBLookupComboBox
Left = 69
Top = 18
Width = 132
Height = 20
KeyField = #23567#21306#21517
ListField = #23567#21306#21517
ListSource = DataSource1
TabOrder = 0
end
end
object GroupBox2: TGroupBox
Left = 4
Top = 60
Width = 219
Height = 156
Caption = #22522#30784#20449#24687#65306
TabOrder = 1
object Label2: TLabel
Left = 8
Top = 25
Width = 60
Height = 12
Caption = #22823#27004#32534#21495#65306
end
object Label3: TLabel
Left = 8
Top = 51
Width = 60
Height = 12
Caption = #22823#27004#21517#31216#65306
end
object Label4: TLabel
Left = 8
Top = 77
Width = 60
Height = 12
Caption = #22823#27004#35828#26126#65306
end
object Label5: TLabel
Left = 8
Top = 103
Width = 60
Height = 12
Caption = #22823#27004#20301#32622#65306
end
object Label7: TLabel
Left = 8
Top = 129
Width = 48
Height = 12
Caption = #36127#36131#20154#65306
end
object Label6: TLabel
Left = 131
Top = 25
Width = 12
Height = 12
Caption = #33267
end
object Edit1: TEdit
Left = 69
Top = 21
Width = 42
Height = 20
TabOrder = 0
Text = '1'
end
object Edit2: TEdit
Left = 69
Top = 47
Width = 141
Height = 20
TabOrder = 1
end
object Edit3: TEdit
Left = 69
Top = 73
Width = 141
Height = 20
TabOrder = 2
Text = #31354
end
object Edit4: TEdit
Left = 69
Top = 99
Width = 141
Height = 20
TabOrder = 3
Text = #31354
end
object Edit5: TEdit
Left = 69
Top = 125
Width = 141
Height = 20
TabOrder = 4
Text = #31354
end
object UpDown1: TUpDown
Left = 111
Top = 21
Width = 17
Height = 20
Associate = Edit1
Min = 0
Position = 1
TabOrder = 5
Wrap = False
end
object Edit6: TEdit
Left = 147
Top = 21
Width = 42
Height = 20
TabOrder = 6
Text = '10'
end
object UpDown2: TUpDown
Left = 189
Top = 21
Width = 17
Height = 20
Associate = Edit6
Min = 0
Position = 10
TabOrder = 7
Wrap = False
end
end
object BitBtn1: TBitBtn
Left = 3
Top = 220
Width = 107
Height = 25
Caption = #24320#22987#29983#25104
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
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 = 114
Top = 220
Width = 107
Height = 25
Caption = #36820#22238#20027#31995#32479
TabOrder = 3
OnClick = BitBtn2Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333FFFFF333333000033333388888833333333333F888888FFF333
000033338811111188333333338833FFF388FF33000033381119999111833333
38F338888F338FF30000339119933331111833338F388333383338F300003391
13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
000039183811193333918338F8F833F83333838F000039118111933339118338
F3833F83333833830000339111193333391833338F33F8333FF838F300003391
11833338111833338F338FFFF883F83300003339111888811183333338FF3888
83FF83330000333399111111993333333388FFFFFF8833330000333333999999
3333333333338888883333330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object DataSource1: TDataSource
DataSet = Query1
Left = 84
Top = 20
end
object Query1: TQuery
Active = True
DatabaseName = 'WYGL'
SQL.Strings = (
'Select '#23567#21306#21517' From '#23567#21306#20449#24687#34920)
Left = 124
Top = 20
object Query1BDEDesigner: TStringField
FieldName = #23567#21306#21517
Origin = 'WYGL.'#23567#21306#20449#24687#34920'.'#23567#21306#21517
FixedChar = True
Size = 10
end
end
object Query2: TQuery
DatabaseName = 'WYGL'
Left = 116
Top = 148
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -