📄 wsalary_work.dfm
字号:
inherited F_Work: TF_Work
Left = 211
Top = 104
Width = 600
Height = 418
ActiveControl = DateTimePicker2
BorderIcons = [biSystemMenu, biMinimize]
Caption = #32771#21220#31649#29702
OldCreateOrder = True
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
inherited ToolBar1: TToolBar
Width = 592
inherited ToolButton1: TToolButton
OnClick = ToolButton1Click
end
inherited ToolButton13: TToolButton
OnClick = ToolButton13Click
end
inherited ToolButton2: TToolButton
OnClick = ToolButton2Click
end
inherited ToolButton3: TToolButton
OnClick = ToolButton3Click
end
inherited ToolButton4: TToolButton
OnClick = ToolButton4Click
end
inherited ToolButton6: TToolButton
OnClick = ToolButton6Click
end
inherited ToolButton5: TToolButton
OnClick = ToolButton5Click
end
inherited ToolButton7: TToolButton
OnClick = ToolButton7Click
end
inherited ToolButton8: TToolButton
OnClick = ToolButton8Click
end
inherited ToolButton9: TToolButton
OnClick = ToolButton9Click
end
inherited ToolButton10: TToolButton
OnClick = ToolButton10Click
end
inherited ToolButton12: TToolButton
OnClick = ToolButton12Click
end
end
object PageControl1: TPageControl [1]
Left = 0
Top = 37
Width = 377
Height = 355
ActivePage = TabSheet5
Align = alCustom
TabIndex = 4
TabOrder = 1
OnChange = PageControl1Change
object TabSheet1: TTabSheet
Caption = #20986#21220#31649#29702
object Label2: TLabel
Left = 97
Top = 4
Width = 60
Height = 13
Caption = #20986#20837#26102#38388#65306
end
object CheckBox1: TCheckBox
Left = 12
Top = 20
Width = 73
Height = 17
Caption = #24403#21069#26102#38388
TabOrder = 0
OnClick = CheckBox1Click
end
object ME_Work: TMaskEdit
Left = 96
Top = 20
Width = 101
Height = 21
EditMask = '!0000-!90-90 !90:00;1;_'
MaxLength = 16
TabOrder = 1
Text = ' - - : '
end
object RG_InOut: TRadioGroup
Left = 230
Top = 3
Width = 113
Height = 40
Caption = #20986#20837#24773#20917
Columns = 2
ItemIndex = 0
Items.Strings = (
#20837
#20986)
TabOrder = 2
end
object DBGrid2: TDBGrid
Left = 0
Top = 48
Width = 369
Height = 279
Align = alCustom
DataSource = DM.DS_Atten
TabOrder = 3
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'Atten_ID'
Title.Alignment = taCenter
Title.Caption = #35760#24405#32534#21495
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = 'Atten_PID'
Title.Alignment = taCenter
Title.Caption = #21592#24037#24037#21495
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'PID_Name'
Title.Alignment = taCenter
Title.Caption = #21592#24037#22995#21517
Visible = True
end
item
Expanded = False
FieldName = 'Atten_In_Out'
Title.Alignment = taCenter
Title.Caption = #20986#20837#24773#20917
Visible = True
end
item
Expanded = False
FieldName = 'Atten_Time'
Title.Alignment = taCenter
Title.Caption = #26102#38388
Width = 107
Visible = True
end>
end
end
object TabSheet2: TTabSheet
Caption = #21152#29677#31649#29702
ImageIndex = 1
object Label4: TLabel
Left = 57
Top = 4
Width = 60
Height = 13
Caption = #21152#29677#26085#26399#65306
end
object Label5: TLabel
Left = 193
Top = 4
Width = 84
Height = 13
Caption = #32047#35745#21152#29677#26102#38388#65306
end
object DBGrid3: TDBGrid
Left = 0
Top = 48
Width = 369
Height = 279
Align = alCustom
DataSource = DM.DS_OTime
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'OTime_ID'
Title.Alignment = taCenter
Title.Caption = #35760#24405#32534#21495
Visible = True
end
item
Alignment = taLeftJustify
Expanded = False
FieldName = 'OTime_PID'
Title.Alignment = taCenter
Title.Caption = #21592#24037#24037#21495
Visible = True
end
item
Expanded = False
FieldName = 'PID_Name'
Title.Alignment = taCenter
Title.Caption = #21592#24037#22995#21517
Width = 56
Visible = True
end
item
Expanded = False
FieldName = 'OTime_Time'
Title.Alignment = taCenter
Title.Caption = #21152#29677#26102#38388
Width = 66
Visible = True
end
item
Expanded = False
FieldName = 'OTime_Date'
Title.Alignment = taCenter
Title.Caption = #21152#29677#26085#26399
Width = 99
Visible = True
end>
end
object CSE_Time: TCSpinEdit
Left = 195
Top = 19
Width = 91
Height = 22
MaxValue = 100
MinValue = 1
TabOrder = 1
Value = 1
end
object DateTimePicker1: TDateTimePicker
Left = 56
Top = 20
Width = 104
Height = 21
CalAlignment = dtaLeft
Date = 37694.8602701736
Time = 37694.8602701736
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 2
end
end
object TabSheet3: TTabSheet
Caption = #20986#24046#31649#29702
ImageIndex = 2
object Label6: TLabel
Left = 3
Top = 1
Width = 60
Height = 13
Caption = #24320#22987#26102#38388#65306
end
object Label7: TLabel
Left = 3
Top = 42
Width = 60
Height = 13
Caption = #32467#26463#26102#38388#65306
end
object Label8: TLabel
Left = 120
Top = 4
Width = 36
Height = 13
Caption = #22791#27880#65306
end
object DBGrid4: TDBGrid
Left = 0
Top = 83
Width = 369
Height = 244
Align = alCustom
DataSource = DM.DS_Evec
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'Evection_ID'
Title.Alignment = taCenter
Title.Caption = #35760#24405#32534#21495
Width = 58
Visible = True
end
item
Expanded = False
FieldName = 'Evection_PID'
Title.Alignment = taCenter
Title.Caption = #21592#24037#24037#21495
Width = 54
Visible = True
end
item
Expanded = False
FieldName = 'PID_Name'
Title.Alignment = taCenter
Title.Caption = #21592#24037#22995#21517
Width = 50
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'Evection_Time'
Title.Alignment = taCenter
Title.Caption = #20986#24046#26102#38388
Visible = True
end
item
Expanded = False
FieldName = 'Evection_TStart'
Title.Alignment = taCenter
Title.Caption = #24320#22987#26102#38388
Width = 70
Visible = True
end
item
Expanded = False
FieldName = 'Evection_TEnd'
Title.Alignment = taCenter
Title.Caption = #32467#26463#26102#38388
Width = 75
Visible = True
end
item
Expanded = False
FieldName = 'Evection_Text'
Title.Alignment = taCenter
Title.Caption = #22791#27880
Visible = True
end>
end
object ME_TStart: TMaskEdit
Left = 2
Top = 17
Width = 101
Height = 21
EditMask = '!0000-!90-90 !90:00;1;_'
MaxLength = 16
TabOrder = 1
Text = ' - - : '
end
object ME_TEnd: TMaskEdit
Left = 2
Top = 59
Width = 101
Height = 21
EditMask = '!0000-!90-90 !90:00;1;_'
MaxLength = 16
TabOrder = 2
Text = ' - - : '
end
object Memo1: TMemo
Left = 160
Top = 3
Width = 204
Height = 78
ScrollBars = ssVertical
TabOrder = 3
end
object CheckBox2: TCheckBox
Left = 77
Top = 41
Width = 66
Height = 17
Caption = #24403#21069#26102#38388
TabOrder = 4
OnClick = CheckBox1Click
end
end
object TabSheet4: TTabSheet
Caption = #35831#20551#31649#29702
ImageIndex = 3
object Label9: TLabel
Left = 3
Top = 1
Width = 60
Height = 13
Caption = #24320#22987#26102#38388#65306
end
object Label10: TLabel
Left = 3
Top = 42
Width = 60
Height = 13
Caption = #32467#26463#26102#38388#65306
end
object Label11: TLabel
Left = 120
Top = 4
Width = 36
Height = 13
Caption = #22791#27880#65306
end
object MaskEdit1: TMaskEdit
Left = 2
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -