?? main.~dfm
字號:
object F_Main: TF_Main
Left = 227
Top = 136
Width = 546
Height = 391
Caption = #32771#21220#21644#24037#36164#31649#29702#31995#32479
Color = clAppWorkSpace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIForm
Menu = MainMenu1
OldCreateOrder = False
WindowState = wsMaximized
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object CGauge1: TCGauge
Left = 216
Top = 304
Width = 97
Height = 17
BorderStyle = bsNone
ForeColor = clNavy
BackColor = clBtnFace
Progress = 10
end
object Image1: TImage
Left = 0
Top = 44
Width = 538
Height = 282
Align = alClient
Center = True
end
object CoolBar1: TCoolBar
Left = 0
Top = 0
Width = 538
Height = 44
Bands = <
item
Control = ToolBar1
ImageIndex = -1
MinHeight = 41
Width = 534
end>
Color = clBtnFace
Images = ImageList1
ParentColor = False
object ToolBar1: TToolBar
Left = 9
Top = 0
Width = 521
Height = 41
ButtonHeight = 40
ButtonWidth = 50
Caption = 'ToolBar1'
EdgeOuter = esNone
Flat = True
Images = ImageList2
TabOrder = 0
object TB_Atten: TToolButton
Left = 0
Top = 0
Caption = #20986#21220#31649#29702'(&A)'
ImageIndex = 0
MenuItem = M_Atten
ParentShowHint = False
ShowHint = True
end
object TB_OTime: TToolButton
Left = 50
Top = 0
Caption = #21152#29677#31649#29702'(&O)'
ImageIndex = 1
MenuItem = M_OTime
end
object TB_Evection: TToolButton
Left = 100
Top = 0
Caption = #20986#24046#31649#29702'(&E)'
ImageIndex = 2
MenuItem = M_Evection
end
object TB_Leave: TToolButton
Left = 150
Top = 0
Caption = #35831#20551#31649#29702'(&L)'
ImageIndex = 3
MenuItem = M_Leave
end
object TB_Stat: TToolButton
Left = 200
Top = 0
Caption = #32771#21220#32479#35745'(&S)'
ImageIndex = 7
MenuItem = M_Stat
end
object ToolButton4: TToolButton
Left = 250
Top = 0
Width = 8
Caption = 'TB_Separator'
ImageIndex = 4
Style = tbsSeparator
end
object TB_SCalculate: TToolButton
Left = 258
Top = 0
Caption = #24037#36164#32467#31639#31649#29702'(&C)'
ImageIndex = 4
MenuItem = M_SCalculate
end
object TB_OCalculate: TToolButton
Left = 308
Top = 0
Caption = #22870#37329#27941#36148#25187#21457#31649#29702'(&A)'
ImageIndex = 5
MenuItem = M_OCalculate
end
object ToolButton9: TToolButton
Left = 358
Top = 0
Width = 8
Caption = 'ToolButton9'
ImageIndex = 7
Style = tbsSeparator
end
object TB_DBCase: TToolButton
Left = 366
Top = 0
Hint = #26159#21542#36827#20837#20844#25991#21253#27169#24335#24037#20316
Caption = #20844#25991#21253#27169#24335'(&O)'
ImageIndex = 6
Style = tbsCheck
OnClick = TB_DBCaseClick
end
object TB_DBUpdate: TToolButton
Left = 416
Top = 0
Hint = #26356#26032#20844#25991#21253#20013#25968#25454#21040#25968#25454#24211
Caption = 'TB_DBUpdate'
ImageIndex = 8
OnClick = TB_DBUpdateClick
end
end
end
object StatusBar1: TStatusBar
Left = 0
Top = 326
Width = 538
Height = 19
AutoHint = True
Panels = <
item
Width = 210
end
item
Style = psOwnerDraw
Width = 150
end
item
Style = psOwnerDraw
Width = 100
end
item
Width = 50
end>
SimplePanel = False
OnDrawPanel = StatusBar1DrawPanel
end
object MainMenu1: TMainMenu
Left = 152
Top = 160
object S1: TMenuItem
Caption = #23433#20840#31649#29702'(&S)'
end
object M_Work: TMenuItem
Caption = #32771#21220#31649#29702'(&W)'
object M_Stat: TMenuItem
Caption = #32771#21220#32479#35745'(&S)'
Hint = #21592#24037#32771#21220#32479#35745
ImageIndex = 7
ShortCut = 120
OnClick = M_StatClick
end
object N2: TMenuItem
Caption = '-'
end
object M_Atten: TMenuItem
Caption = #20986#21220#31649#29702'(&A)'
Hint = #21592#24037#20986#21220#35760#24405#28155#21152#20462#25913#21024#38500#21644#26597#35810
ImageIndex = 0
ShortCut = 113
OnClick = M_AttenClick
end
object M_OTime: TMenuItem
Caption = #21152#29677#31649#29702'(&O)'
Hint = #21592#24037#21152#29677#35760#24405#28155#21152#20462#25913#21024#38500#21644#26597#35810
ImageIndex = 1
ShortCut = 114
OnClick = M_OTimeClick
end
object M_Evection: TMenuItem
Caption = #20986#24046#31649#29702'(&E)'
Hint = #21592#24037#20986#24046#35760#24405#28155#21152#20462#25913#21024#38500#21644#26597#35810
ImageIndex = 2
ShortCut = 115
OnClick = M_EvectionClick
end
object M_Leave: TMenuItem
Caption = #35831#20551#31649#29702'(&L)'
Hint = #21592#24037#35831#20551#35760#24405#28155#21152#20462#25913#21024#38500#21644#26597#35810
ImageIndex = 3
ShortCut = 116
OnClick = M_LeaveClick
end
end
object M_Salary: TMenuItem
Caption = #24037#36164#31649#29702'(&P)'
object M_SCalculate: TMenuItem
Caption = #24037#36164#32467#31639#31649#29702'(&C)'
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -