📄 unit1.~dfm
字号:
object Form1: TForm1
Left = 199
Top = 106
Width = 824
Height = 546
Caption = #20316#19994#22235' C/S'#31649#29702#20449#24687#31995#32479
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 816
Height = 519
ActivePage = TabSheet1
Align = alClient
TabOrder = 0
OnChange = PageControl2Change
object TabSheet1: TTabSheet
Caption = #23398#29983#25104#32489#31649#29702
object PageControl4: TPageControl
Left = 0
Top = 0
Width = 808
Height = 491
ActivePage = TabSheet8
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MultiLine = True
ParentFont = False
TabOrder = 0
TabPosition = tpLeft
OnChange = PageControl2Change
object TabSheet8: TTabSheet
Caption = #25104#32489#26597#35810
DesignSize = (
780
483)
object GroupBox7: TGroupBox
Left = 22
Top = 4
Width = 747
Height = 459
Anchors = [akLeft, akTop, akRight, akBottom]
Caption = #26597#35810#35838#31243#24773#20917
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
DesignSize = (
747
459)
object Label12: TLabel
Left = 8
Top = 20
Width = 96
Height = 13
Caption = #36755#20837#35201#26597#35810#30340#23398#21495
end
object Label13: TLabel
Left = 8
Top = 52
Width = 60
Height = 13
Caption = #35838#31243#24773#20917#65306
end
object Bevel6: TBevel
Left = 8
Top = 44
Width = 729
Height = 5
Anchors = [akLeft, akTop, akRight]
Shape = bsBottomLine
end
object DBGrid3: TDBGrid
Left = 2
Top = 72
Width = 743
Height = 385
Align = alBottom
Anchors = [akLeft, akTop, akRight, akBottom]
DataSource = DataSource2
Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
PopupMenu = PopupMenu3
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #23398#29983'.'#23398#21495
Title.Caption = #23398#21495
Width = 86
Visible = True
end
item
Expanded = False
FieldName = #23398#29983#22995#21517
Title.Caption = #22995#21517
Width = 56
Visible = True
end
item
Expanded = False
FieldName = #23398#38498
Width = 130
Visible = True
end
item
Expanded = False
FieldName = #19987#19994
Width = 168
Visible = True
end
item
Expanded = False
FieldName = #35838#31243
Width = 199
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = #25104#32489
Width = 51
Visible = True
end>
end
object Edit7: TEdit
Left = 116
Top = 16
Width = 261
Height = 21
TabOrder = 1
end
object BitBtn5: TBitBtn
Left = 388
Top = 14
Width = 73
Height = 24
Caption = #26597#25214
Default = True
TabOrder = 2
OnClick = BitBtn5Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object BitBtn7: TBitBtn
Left = 484
Top = 14
Width = 89
Height = 25
Caption = #26174#31034#20840#37096
TabOrder = 3
OnClick = BitBtn7Click
Kind = bkRetry
end
end
end
object TabSheet9: TTabSheet
Caption = #22686#21152#25104#32489
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ImageIndex = 1
ParentFont = False
object Bevel7: TBevel
Left = 8
Top = 228
Width = 689
Height = 17
Shape = bsBottomLine
end
object BitBtn6: TBitBtn
Left = 48
Top = 264
Width = 137
Height = 33
Caption = ' '#28155#21152' >>'
TabOrder = 0
OnClick = BitBtn6Click
Kind = bkOK
end
object GroupBox8: TGroupBox
Left = 8
Top = 16
Width = 269
Height = 201
TabOrder = 1
object Label22: TLabel
Left = 12
Top = 64
Width = 37
Height = 13
AutoSize = False
Caption = #35838#31243
end
object Label24: TLabel
Left = 12
Top = 116
Width = 37
Height = 17
AutoSize = False
Caption = #25104#32489
end
object Label25: TLabel
Left = 12
Top = 20
Width = 33
Height = 13
AutoSize = False
Caption = #23398#21495
end
object Edit8: TEdit
Left = 52
Top = 16
Width = 189
Height = 21
TabOrder = 0
Text = 'Edit8'
end
object ComboBox12: TComboBox
Left = 52
Top = 60
Width = 189
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 1
OnChange = ComboBox12Change
end
object Edit9: TEdit
Left = 52
Top = 112
Width = 189
Height = 21
TabOrder = 2
Text = 'Edit9'
end
end
object GroupBox9: TGroupBox
Left = 300
Top = 16
Width = 397
Height = 205
TabOrder = 2
object Panel1: TPanel
Left = 2
Top = 15
Width = 393
Height = 188
Align = alClient
BevelOuter = bvNone
Caption = #36755#20837#23398#21495#12289#35838#31243#12289#21644#25104#32489#21518#25353#28155#21152#25353#38062
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
end
object StaticText3: TStaticText
Left = 196
Top = 264
Width = 4
Height = 4
BevelInner = bvNone
BevelKind = bkTile
Color = clCream
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 3
end
end
end
end
object TabSheet2: TTabSheet
Caption = #24320#35774#35838#31243#24773#20917
ImageIndex = 1
object PageControl2: TPageControl
Left = 0
Top = 0
Width = 808
Height = 491
ActivePage = TabSheet4
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MultiLine = True
ParentFont = False
TabOrder = 0
TabPosition = tpLeft
OnChange = PageControl2Change
object TabSheet4: TTabSheet
Caption = #35838#31243#26597#35810
DesignSize = (
780
483)
object GroupBox1: TGroupBox
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -