📄 unit1.~dfm
字号:
object Form1: TForm1
Left = 173
Top = 98
Width = 1025
Height = 614
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
WindowState = wsMaximized
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Panel3: TPanel
Left = 0
Top = 41
Width = 1017
Height = 546
Align = alClient
Caption = 'Panel3'
TabOrder = 0
object PageControl1: TPageControl
Left = 1
Top = 1
Width = 1015
Height = 544
ActivePage = TabSheet1
Align = alClient
TabIndex = 0
TabOrder = 0
OnChange = PageControl1Change
OnMouseMove = PageControl1MouseMove
object TabSheet1: TTabSheet
Caption = #25353#37096#38376
object Panel1: TPanel
Left = 0
Top = 0
Width = 249
Height = 516
Align = alLeft
BevelOuter = bvSpace
Caption = 'Panel1'
TabOrder = 0
object TreeView1: TTreeView
Left = 1
Top = 1
Width = 247
Height = 514
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -9
Font.Name = 'MS Sans Serif'
Font.Style = []
HotTrack = True
Indent = 22
ParentFont = False
ReadOnly = True
TabOrder = 0
OnDblClick = TreeView1DblClick
OnMouseMove = TreeView1MouseMove
end
end
object Panel2: TPanel
Left = 249
Top = 0
Width = 758
Height = 516
Align = alClient
Caption = 'Panel2'
Ctl3D = False
ParentCtl3D = False
TabOrder = 1
object ListBox1: TListBox
Left = 1
Top = 1
Width = 756
Height = 514
Align = alClient
ItemHeight = 13
TabOrder = 0
OnDblClick = ListBox1DblClick
OnMouseMove = ListBox1MouseMove
end
end
end
object TabSheet2: TTabSheet
Caption = #25163#24037#36873#25321
ImageIndex = 1
object Panel5: TPanel
Left = 0
Top = 0
Width = 1007
Height = 273
Align = alTop
Caption = 'Panel5'
TabOrder = 0
object Panel7: TPanel
Left = 1
Top = 1
Width = 249
Height = 271
Align = alLeft
BevelOuter = bvSpace
Caption = 'Panel1'
TabOrder = 0
object TreeView2: TTreeView
Left = 1
Top = 1
Width = 247
Height = 269
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -9
Font.Name = 'MS Sans Serif'
Font.Style = []
HotTrack = True
Indent = 22
ParentFont = False
ReadOnly = True
TabOrder = 0
OnClick = TreeView2Click
OnMouseMove = TreeView2MouseMove
end
end
object Panel8: TPanel
Left = 250
Top = 1
Width = 756
Height = 271
Align = alClient
Caption = 'Panel8'
TabOrder = 1
object DBGrid1: TDBGrid
Left = 1
Top = 1
Width = 754
Height = 269
Cursor = crHandPoint
Align = alClient
Ctl3D = False
DataSource = DataSource1
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgCancelOnExit]
ParentCtl3D = False
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnDblClick = DBGrid1DblClick
OnMouseMove = DBGrid1MouseMove
OnTitleClick = DBGrid1TitleClick
Columns = <
item
Expanded = False
Title.Caption = #29992#25143#32534#21495
Width = 76
Visible = True
end
item
Expanded = False
Title.Caption = #22995' '#21517
Width = 113
Visible = True
end
item
Expanded = False
Title.Caption = #24615' '#21035
Width = 45
Visible = True
end
item
Expanded = False
Title.Caption = #32844' '#21153
Width = 122
Visible = True
end
item
Expanded = False
Title.Caption = #27665#26063
Visible = True
end>
end
end
end
object Panel6: TPanel
Left = 0
Top = 273
Width = 1007
Height = 243
Align = alClient
TabOrder = 1
object GroupBox1: TGroupBox
Left = 1
Top = 1
Width = 1005
Height = 241
Align = alClient
Caption = #24050#36873#25321#30340#29992#25143#65306
TabOrder = 0
object Panel12: TPanel
Left = 2
Top = 15
Width = 265
Height = 224
Align = alLeft
Caption = 'Panel12'
TabOrder = 0
object ListBox2: TListBox
Left = 1
Top = 1
Width = 263
Height = 222
Align = alClient
ItemHeight = 13
TabOrder = 0
OnDblClick = ListBox2DblClick
OnMouseMove = ListBox2MouseMove
end
end
object Panel13: TPanel
Left = 267
Top = 15
Width = 736
Height = 224
Align = alClient
Caption = 'Panel13'
TabOrder = 1
object DBGrid2: TDBGrid
Left = 1
Top = 1
Width = 734
Height = 222
Align = alClient
DataSource = DataSource2
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnMouseMove = DBGrid2MouseMove
end
end
end
end
end
object TabSheet3: TTabSheet
Caption = #29983#25104#23545#29031#20851#31995#34920
ImageIndex = 2
object Panel9: TPanel
Left = 0
Top = 0
Width = 1007
Height = 41
Align = alTop
TabOrder = 0
OnMouseMove = Panel9MouseMove
object Label1: TLabel
Left = 380
Top = 20
Width = 84
Height = 13
Caption = #23545#24212#26087#34920#20851#31995#65306
OnMouseMove = Label1MouseMove
end
object Label2: TLabel
Left = 491
Top = 3
Width = 72
Height = 13
Caption = #26087#34920#21333#20301#20195#30721
end
object Label3: TLabel
Left = 685
Top = 2
Width = 72
Height = 13
Caption = #26087#34920#21333#20301#21517#31216
end
object Label4: TLabel
Left = 33
Top = 2
Width = 72
Height = 13
Caption = #26032#34920#21333#20301#20195#30721
end
object Label5: TLabel
Left = 187
Top = 4
Width = 72
Height = 13
Caption = #26032#34920#21333#20301#21517#31216
end
object Edit3: TEdit
Left = 465
Top = 17
Width = 144
Height = 21
ReadOnly = True
TabOrder = 0
OnDblClick = Edit3DblClick
OnMouseMove = Edit3MouseMove
end
object Edit4: TEdit
Left = 616
Top = 17
Width = 217
Height = 21
ReadOnly = True
TabOrder = 1
OnMouseMove = Edit4MouseMove
end
object Edit5: TEdit
Left = 160
Top = 17
Width = 217
Height = 21
ReadOnly = True
TabOrder = 2
OnMouseMove = Edit5MouseMove
end
object Edit6: TEdit
Left = 5
Top = 16
Width = 148
Height = 21
ReadOnly = True
TabOrder = 3
OnMouseMove = Edit6MouseMove
end
object Button2: TButton
Left = 848
Top = 8
Width = 75
Height = 25
Caption = #24314#31435#20851#31995
TabOrder = 4
OnClick = Button2Click
end
object Button3: TButton
Left = 928
Top = 8
Width = 75
Height = 25
Caption = #21462' '#28040
TabOrder = 5
OnClick = Button3Click
end
end
object Panel10: TPanel
Left = 0
Top = 41
Width = 297
Height = 475
Align = alLeft
Caption = 'Panel10'
TabOrder = 1
object TreeView3: TTreeView
Left = 1
Top = 1
Width = 295
Height = 473
Align = alClient
Indent = 19
TabOrder = 0
OnDblClick = TreeView3DblClick
OnMouseMove = TreeView3MouseMove
end
end
object Panel15: TPanel
Left = 297
Top = 41
Width = 710
Height = 475
Align = alClient
Caption = 'Panel15'
TabOrder = 2
object Panel11: TPanel
Left = 1
Top = 1
Width = 708
Height = 320
Align = alTop
Caption = 'Panel11'
TabOrder = 0
object DBGrid3: TDBGrid
Left = 1
Top = 1
Width = 706
Height = 318
Align = alClient
DataSource = DataSource4
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnDblClick = DBGrid3DblClick
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -