📄 facdate.dfm
字号:
object PickFacDate: TPickFacDate
Left = 274
Top = 115
Width = 395
Height = 265
Caption = '生产日期选择'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poOwnerFormCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 16
Top = 40
Width = 36
Height = 12
Caption = '星期日'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 69
Top = 40
Width = 36
Height = 12
Caption = '星期一'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 122
Top = 40
Width = 36
Height = 12
Caption = '星期二'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 175
Top = 40
Width = 36
Height = 12
Caption = '星期三'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 226
Top = 40
Width = 36
Height = 12
Caption = '星期四'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 280
Top = 40
Width = 36
Height = 12
Caption = '星期五'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 333
Top = 40
Width = 36
Height = 12
Caption = '星期六'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 211
Top = 11
Width = 12
Height = 12
Caption = '年'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 274
Top = 13
Width = 12
Height = 12
Caption = '月'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 36
Top = 9
Width = 90
Height = 15
Caption = '请选择日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clGreen
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object CheckBox1: TCheckBox
Left = 16
Top = 70
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 0
OnMouseDown = CheckBox1MouseDown
end
object CheckBox2: TCheckBox
Left = 69
Top = 70
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 1
OnMouseDown = CheckBox2MouseDown
end
object CheckBox3: TCheckBox
Left = 122
Top = 70
Width = 49
Height = 17
Color = clBtnFace
ParentColor = False
PopupMenu = PopupMenu1
TabOrder = 2
OnMouseDown = CheckBox3MouseDown
end
object CheckBox4: TCheckBox
Left = 175
Top = 70
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 3
OnMouseDown = CheckBox4MouseDown
end
object CheckBox5: TCheckBox
Left = 226
Top = 70
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 4
OnMouseDown = CheckBox5MouseDown
end
object CheckBox6: TCheckBox
Left = 280
Top = 70
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 5
OnMouseDown = CheckBox6MouseDown
end
object CheckBox7: TCheckBox
Left = 333
Top = 70
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 6
OnMouseDown = CheckBox7MouseDown
end
object CheckBox8: TCheckBox
Left = 16
Top = 91
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 7
OnMouseDown = CheckBox8MouseDown
end
object CheckBox9: TCheckBox
Left = 69
Top = 91
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 8
OnMouseDown = CheckBox9MouseDown
end
object CheckBox10: TCheckBox
Left = 122
Top = 91
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 9
OnMouseDown = CheckBox10MouseDown
end
object CheckBox11: TCheckBox
Left = 175
Top = 91
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 10
OnMouseDown = CheckBox11MouseDown
end
object CheckBox12: TCheckBox
Left = 226
Top = 91
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 11
OnMouseDown = CheckBox12MouseDown
end
object CheckBox13: TCheckBox
Left = 280
Top = 91
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 12
OnMouseDown = CheckBox13MouseDown
end
object CheckBox14: TCheckBox
Left = 333
Top = 91
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 13
OnMouseDown = CheckBox14MouseDown
end
object CheckBox15: TCheckBox
Left = 16
Top = 112
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 14
OnMouseDown = CheckBox15MouseDown
end
object CheckBox16: TCheckBox
Left = 69
Top = 112
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 15
OnMouseDown = CheckBox16MouseDown
end
object CheckBox17: TCheckBox
Left = 122
Top = 112
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 16
OnMouseDown = CheckBox17MouseDown
end
object CheckBox18: TCheckBox
Left = 175
Top = 112
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 17
OnMouseDown = CheckBox18MouseDown
end
object CheckBox19: TCheckBox
Left = 226
Top = 112
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 18
OnMouseDown = CheckBox19MouseDown
end
object CheckBox20: TCheckBox
Left = 280
Top = 112
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 19
OnMouseDown = CheckBox20MouseDown
end
object CheckBox21: TCheckBox
Left = 333
Top = 112
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 20
OnMouseDown = CheckBox21MouseDown
end
object CheckBox22: TCheckBox
Left = 16
Top = 132
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 21
OnMouseDown = CheckBox22MouseDown
end
object CheckBox23: TCheckBox
Left = 69
Top = 132
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 22
OnMouseDown = CheckBox23MouseDown
end
object CheckBox24: TCheckBox
Left = 122
Top = 132
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 23
OnMouseDown = CheckBox24MouseDown
end
object CheckBox25: TCheckBox
Left = 175
Top = 132
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 24
OnMouseDown = CheckBox25MouseDown
end
object CheckBox26: TCheckBox
Left = 226
Top = 132
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 25
OnMouseDown = CheckBox26MouseDown
end
object CheckBox27: TCheckBox
Left = 280
Top = 132
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 26
OnMouseDown = CheckBox27MouseDown
end
object CheckBox28: TCheckBox
Left = 333
Top = 132
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 27
OnMouseDown = CheckBox28MouseDown
end
object CheckBox29: TCheckBox
Left = 16
Top = 153
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 28
OnMouseDown = CheckBox29MouseDown
end
object CheckBox30: TCheckBox
Left = 69
Top = 153
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 29
OnMouseDown = CheckBox30MouseDown
end
object CheckBox31: TCheckBox
Left = 122
Top = 153
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 30
OnMouseDown = CheckBox31MouseDown
end
object CheckBox32: TCheckBox
Left = 175
Top = 153
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 31
OnMouseDown = CheckBox32MouseDown
end
object CheckBox33: TCheckBox
Left = 226
Top = 153
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 32
OnMouseDown = CheckBox33MouseDown
end
object CheckBox34: TCheckBox
Left = 280
Top = 153
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 33
OnMouseDown = CheckBox34MouseDown
end
object CheckBox35: TCheckBox
Left = 333
Top = 153
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 34
OnMouseDown = CheckBox35MouseDown
end
object CheckBox36: TCheckBox
Left = 16
Top = 174
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 35
OnMouseDown = CheckBox36MouseDown
end
object CheckBox37: TCheckBox
Left = 69
Top = 174
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 36
OnMouseDown = CheckBox37MouseDown
end
object CheckBox38: TCheckBox
Left = 122
Top = 174
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 37
OnMouseDown = CheckBox38MouseDown
end
object CheckBox39: TCheckBox
Left = 175
Top = 174
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 38
OnMouseDown = CheckBox39MouseDown
end
object CheckBox40: TCheckBox
Left = 226
Top = 174
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 39
OnMouseDown = CheckBox40MouseDown
end
object CheckBox41: TCheckBox
Left = 280
Top = 174
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 40
OnMouseDown = CheckBox41MouseDown
end
object CheckBox42: TCheckBox
Left = 333
Top = 174
Width = 49
Height = 17
PopupMenu = PopupMenu1
TabOrder = 41
OnMouseDown = CheckBox42MouseDown
end
object YearSpin: TCSpinEdit
Left = 151
Top = 8
Width = 50
Height = 21
TabStop = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
MaxValue = 2500
MinValue = 1999
ParentColor = False
ParentFont = False
TabOrder = 42
Value = 2000
OnChange = YearSpinChange
end
object MonthSpin: TCSpinEdit
Left = 227
Top = 8
Width = 38
Height = 21
TabStop = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
MaxValue = 12
MinValue = 1
ParentColor = False
ParentFont = False
TabOrder = 43
Value = 7
OnChange = YearSpinChange
end
object BitBtn1: TBitBtn
Left = 168
Top = 208
Width = 75
Height = 25
Caption = '确定'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 44
OnClick = BitBtn1Click
Kind = bkOK
end
object BitBtn2: TBitBtn
Left = 288
Top = 208
Width = 75
Height = 25
Caption = '取消'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 45
Kind = bkCancel
end
object PopupMenu1: TPopupMenu
Left = 320
Top = 8
object N1: TMenuItem
Caption = '停工'
OnClick = N1Click
end
object N2: TMenuItem
Caption = '厂休'
OnClick = N2Click
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -