main.dfm
来自「适合行业为眼镜业」· DFM 代码 · 共 1,441 行 · 第 1/5 页
DFM
1,441 行
object frm_Main: Tfrm_Main
Left = 1
Top = 1
Width = 798
Height = 570
Caption = #30524#38236#36830#38145#31649#29702#65288#21518#21488#31649#29702#29256' Beta 2.8.2'#65289
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Visible = True
WindowState = wsMaximized
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnKeyDown = FormKeyDown
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 14
object P_anel1: TPanel
Left = 0
Top = 0
Width = 790
Height = 543
Align = alClient
Color = clSkyBlue
TabOrder = 0
object Panel_Title: TPanel
Left = 1
Top = 1
Width = 788
Height = 24
Align = alTop
BevelOuter = bvNone
Caption = #36830#38145#31649#29702#31995#32479#36827#38144#23384
Color = 16772335
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -20
Font.Name = #21326#25991#26032#39759
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object Panel3: TPanel
Left = 1
Top = 25
Width = 788
Height = 517
Align = alClient
BevelOuter = bvNone
Caption = 'Panel3'
Color = clSkyBlue
TabOrder = 1
object StatusBar1: TStatusBar
Left = 0
Top = 495
Width = 788
Height = 22
Color = 16772335
Font.Charset = GB2312_CHARSET
Font.Color = clFuchsia
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
Panels = <
item
Text = #24403#21069#25805#20316#21592#65306
Width = 170
end
item
Text = #37096#38376#32534#21495#65306
Width = 265
end
item
Text = #20351#29992#20179#24211#32534#21495#65306
Width = 50
end>
SimplePanel = False
UseSystemFont = False
end
object P1: TPanel
Left = 165
Top = 0
Width = 623
Height = 495
Align = alClient
BevelOuter = bvNone
BorderStyle = bsSingle
Color = clCream
TabOrder = 1
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 619
Height = 491
ActivePage = TabSheet3
Align = alClient
TabIndex = 2
TabOrder = 0
object TabSheet1: TTabSheet
Caption = ' '#37319#36141#20449#24687#31649#29702
object Panel6: TPanel
Left = 0
Top = 341
Width = 611
Height = 121
Align = alBottom
Caption = 'Panel6'
Color = clSkyBlue
TabOrder = 0
object GroupBox1: TGroupBox
Left = 1
Top = 1
Width = 609
Height = 119
Align = alClient
Color = 16772335
Ctl3D = True
ParentColor = False
ParentCtl3D = False
ParentShowHint = False
ShowHint = False
TabOrder = 0
OnMouseMove = GroupBox3MouseMove
inline Frame11: TFrame1
Left = 53
Top = 20
Width = 171
Height = 21
Hint = '40'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = Frame11Click
inherited Label1: TLabel
Left = 43
Width = 104
Hint = '40'
Caption = #37319#36141#20837#24211#32479#35745#26597#35810
OnClick = Frame11Click
end
inherited Image1: TImage
Hint = '40'
end
end
inline Frame12: TFrame1
Left = 240
Top = 20
Width = 192
Height = 21
Hint = '41'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = Frame12Click
inherited Label1: TLabel
Width = 104
Caption = #37319#36141#36864#36135#32479#35745#26597#35810
end
end
inline Frame16: TFrame1
Left = 52
Top = 54
Width = 165
Height = 21
Hint = '42'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = Frame16Click
inherited Label1: TLabel
Left = 44
Width = 52
Caption = #37319#36141#26085#25253
end
end
inline Frame17: TFrame1
Left = 240
Top = 54
Width = 158
Height = 21
Hint = '43'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = Frame17Click
inherited Label1: TLabel
Left = 43
Width = 52
Caption = #37319#36141#26376#25253
OnClick = Frame17Label1Click
end
end
inline Frame18: TFrame1
Left = 417
Top = 53
Width = 192
Height = 21
Hint = '44'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = Frame18Click
inherited Label1: TLabel
Width = 131
Caption = #37319#36141#25253#34920'('#20219#24847#26102#38388#27573')'
end
end
inline Frame118: TFrame1
Left = 52
Top = 89
Width = 177
Height = 22
Hint = '61'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = Frame118Click
inherited Label1: TLabel
Width = 117
Caption = #20379#24212#21830#21830#21697#20837#24211#32479#35745
end
end
inline Frame117: TFrame1
Left = 240
Top = 89
Width = 158
Height = 21
Hint = '62'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = Frame117Click
inherited Label1: TLabel
Left = 43
Width = 78
Caption = #35746#21333#21830#21697#26597#35810
end
end
end
end
object Panel2: TPanel
Left = 0
Top = 0
Width = 611
Height = 341
Align = alClient
Color = clInfoBk
TabOrder = 1
object ListView1: TListView
Left = 1
Top = 1
Width = 609
Height = 339
Align = alClient
BevelInner = bvSpace
BevelOuter = bvNone
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?