📄 main.dfm
字号:
object FrmMain: TFrmMain
Left = 211
Top = 150
BorderStyle = bsNone
Caption = 'FrmMain'
ClientHeight = 524
ClientWidth = 729
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
Visible = True
OnActivate = FormActivate
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object MainTitle: TFlatTitlebar
Left = 0
Top = 0
Width = 729
Height = 25
ActiveTextColor = clYellow
InactiveTextColor = clMoneyGreen
TitlebarColor = clGreen
Align = alTop
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
Caption = #30005#33041#20844#21496#21806#21518#26381#21153#31995#32479
object BtnExit2: TFlatButton
Left = 704
Top = 0
Width = 25
Height = 25
Color = clGreen
ColorFocused = clGreen
ColorDown = clGreen
ColorBorder = clGreen
ColorHighLight = clLime
Caption = #215
Font.Charset = GB2312_CHARSET
Font.Color = clYellow
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ParentColor = False
TabOrder = 0
OnClick = SubExitClick
end
end
object PanelTop: TFlatPanel
Left = 0
Top = 25
Width = 729
Height = 92
ParentColor = True
ColorHighLight = clGreen
ColorShadow = clGreen
Align = alTop
TabOrder = 1
object CoolBar1: TCoolBar
Left = 1
Top = 1
Width = 727
Height = 90
AutoSize = True
BandBorderStyle = bsNone
Bands = <
item
Control = ToolBar1
ImageIndex = -1
MinHeight = 20
Width = 727
end
item
Control = ToolBar2
ImageIndex = -1
MinHeight = 35
Width = 727
end
item
Control = ToolBar3
ImageIndex = -1
MinHeight = 35
Width = 727
end>
Ctl3D = False
EdgeInner = esNone
EdgeOuter = esNone
object ToolBar1: TToolBar
Left = 9
Top = 0
Width = 714
Height = 20
Align = alNone
ButtonHeight = 20
ButtonWidth = 91
Caption = 'ToolBar1'
Ctl3D = True
EdgeBorders = []
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
ShowCaptions = True
TabOrder = 0
Transparent = True
object TBtnSys1: TToolButton
Left = 0
Top = 0
Caption = #31995#32479#30331#24405'(&L))'
Grouped = True
MenuItem = MenuSys1
end
object TBtnSys2: TToolButton
Left = 91
Top = 0
Caption = #31995#32479#35774#32622'(&S)'
Grouped = True
MenuItem = MenuSys
end
object TBtnMgr: TToolButton
Left = 182
Top = 0
Caption = #23458#25143#31649#29702'(&M)'
Grouped = True
MenuItem = MenuMgr
end
object TBtnDataMgr: TToolButton
Left = 273
Top = 0
Caption = #25968#25454#24211#31649#29702'(&D)'
Grouped = True
MenuItem = MenuDataMgr
end
object TBtnHelp: TToolButton
Left = 364
Top = 0
Caption = #24110#21161'(&H)'
Grouped = True
MenuItem = MenuHelp
end
end
object ToolBar2: TToolBar
Left = 9
Top = 20
Width = 714
Height = 35
ButtonHeight = 35
ButtonWidth = 67
Caption = 'ToolBar2'
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Images = ImageList1
ShowCaptions = True
TabOrder = 1
Transparent = True
object TBtnLogin: TToolButton
Left = 0
Top = 0
Caption = #25805#20316#21592#30331#24405
ImageIndex = 0
OnClick = SubLoginClick
end
object TBtnLoginOff: TToolButton
Left = 67
Top = 0
Caption = #27880#38144
ImageIndex = 2
OnClick = TBtnLoginOffClick
end
object TBntExit: TToolButton
Left = 134
Top = 0
Caption = #36864#20986#31243#24207
ImageIndex = 1
OnClick = SubExitClick
end
end
object ToolBar3: TToolBar
Left = 9
Top = 55
Width = 714
Height = 35
ButtonHeight = 35
ButtonWidth = 67
Caption = 'ToolBar3'
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Images = ImageList1
ShowCaptions = True
TabOrder = 2
object TBtnEnter: TToolButton
Left = 0
Top = 0
Caption = #23458#25143#24405#20837
ImageIndex = 3
OnClick = SubEnterClick
end
object l1: TToolButton
Left = 67
Top = 0
Width = 15
Caption = 'l1'
ImageIndex = 8
Style = tbsSeparator
end
object TBtnPT: TToolButton
Left = 82
Top = 0
Caption = #26222#36890#29992#25143
ImageIndex = 4
OnClick = TBtnPTClick
end
object TBtnTS: TToolButton
Left = 149
Top = 0
Caption = #29305#27530#23458#25143
ImageIndex = 5
OnClick = TBtnTSClick
end
object ToolButton1: TToolButton
Left = 216
Top = 0
Width = 15
Caption = 'ToolButton1'
ImageIndex = 8
Style = tbsSeparator
end
object BtnOverRun: TToolButton
Left = 231
Top = 0
Caption = #36807#20445#23458#25143
ImageIndex = 15
OnClick = N15Click
end
object BtnWGB: TToolButton
Left = 298
Top = 0
Caption = #26410#36807#20445#23458#25143
ImageIndex = 16
OnClick = N13Click
end
object l2: TToolButton
Left = 365
Top = 0
Width = 15
Caption = 'l2'
ImageIndex = 8
Style = tbsSeparator
end
object TBtnAll: TToolButton
Left = 380
Top = 0
Caption = #25152#26377#23458#25143
ImageIndex = 6
OnClick = TBtnAllClick
end
object l3: TToolButton
Left = 447
Top = 0
Width = 15
Caption = 'l3'
ImageIndex = 7
Style = tbsSeparator
end
object TBtnSysTemSetup: TToolButton
Left = 462
Top = 0
Caption = #25805#20316#21592#35774#32622
ImageIndex = 7
OnClick = SubCaoZuoRenClick
end
object Panel2: TPanel
Left = 529
Top = 0
Width = 184
Height = 35
BevelOuter = bvNone
TabOrder = 0
object lblAmount: TLabel
Left = 88
Top = 16
Width = 6
Height = 12
end
end
end
end
end
object PanelBottom: TFlatPanel
Left = 0
Top = 501
Width = 729
Height = 23
ParentColor = True
ColorHighLight = clGreen
ColorShadow = clGreen
Align = alBottom
TabOrder = 2
object PanelLogin: TFlatPanel
Left = 1
Top = 1
Width = 224
Height = 21
Caption = 'PanelLogin'
ParentColor = True
ColorHighLight = clGreen
ColorShadow = clGreen
Align = alLeft
TabOrder = 0
end
object PanelLevel: TFlatPanel
Left = 225
Top = 1
Width = 223
Height = 21
Caption = 'PanelLevel'
ParentColor = True
ColorHighLight = clGreen
ColorShadow = clGreen
Align = alClient
TabOrder = 1
end
object PanelDateTime: TFlatPanel
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -