📄 add_class_pas.~dfm
字号:
object add_class: Tadd_class
Left = 248
Top = 186
Width = 230
Height = 291
BorderIcons = [biSystemMenu]
Caption = 'add_class'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 222
Height = 264
Align = alClient
BevelOuter = bvNone
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 0
object Label1: TLabel
Left = 5
Top = 15
Width = 40
Height = 13
Caption = '線 路'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 5
Top = 70
Width = 52
Height = 13
Caption = '上班時間'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 5
Top = 97
Width = 52
Height = 13
Caption = '下班時間'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 5
Top = 125
Width = 52
Height = 13
Caption = '巡更周期'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 5
Top = 180
Width = 78
Height = 13
Caption = '到崗偏差上限'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 5
Top = 207
Width = 78
Height = 13
Caption = '到崗偏差下限'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 5
Top = 42
Width = 40
Height = 13
Caption = '班 次'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 129
Top = 127
Width = 13
Height = 13
Caption = '分'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 129
Top = 186
Width = 13
Height = 13
Caption = '分'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 129
Top = 207
Width = 13
Height = 13
Caption = '分'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 5
Top = 152
Width = 52
Height = 13
Caption = '巡更次數'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 129
Top = 164
Width = 13
Height = 13
Caption = '分'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 129
Top = 148
Width = 13
Height = 13
Caption = '次'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object BitBtn5: TBitBtn
Left = 7
Top = 231
Width = 84
Height = 26
Cursor = crHandPoint
Caption = '確認(&Y)'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 8
OnClick = BitBtn5Click
Glyph.Data = {
F2010000424DF201000000000000760000002800000024000000130000000100
0400000000007C01000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333334433333
3333333333388F3333333333000033334224333333333333338338F333333333
0000333422224333333333333833338F33333333000033422222243333333333
83333338F3333333000034222A22224333333338F33F33338F33333300003222
A2A2224333333338F383F3338F33333300003A2A222A222433333338F8333F33
38F33333000034A22222A22243333338833333F3338F333300004222A2222A22
2433338F338F333F3338F3330000222A3A2224A22243338F3838F338F3338F33
0000A2A333A2224A2224338F83338F338F3338F300003A33333A2224A2224338
333338F338F3338F000033333333A2224A2243333333338F338F338F00003333
33333A2224A2233333333338F338F83300003333333333A2224A333333333333
8F338F33000033333333333A222433333333333338F338F30000333333333333
A224333333333333338F38F300003333333333333A223333333333333338F8F3
000033333333333333A3333333333333333383330000}
NumGlyphs = 2
Spacing = 0
end
object BitBtn2: TBitBtn
Left = 116
Top = 231
Width = 84
Height = 26
Cursor = crHandPoint
Cancel = True
Caption = '取消(&X)'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 9
OnClick = BitBtn2Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333FFFFF333333000033333388888833333333333F888888FFF333
000033338811111188333333338833FFF388FF33000033381119999111833333
38F338888F338FF30000339119933331111833338F388333383338F300003391
13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
000039183811193333918338F8F833F83333838F000039118111933339118338
F3833F83333833830000339111193333391833338F33F8333FF838F300003391
11833338111833338F338FFFF883F83300003339111888811183333338FF3888
83FF83330000333399111111993333333388FFFFFF8833330000333333999999
3333333333338888883333330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
Spacing = 0
end
object DBLookupComboBox1: TDBLookupComboBox
Left = 91
Top = 7
Width = 109
Height = 21
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ImeName = '中文 (简体) - 智能 ABC'
KeyField = 'linename'
ListField = 'linename'
ListFieldIndex = 1
ListSource = dm_class_form.ds_line
ParentFont = False
TabOrder = 0
OnKeyDown = DBLookupComboBox1KeyDown
end
object Edit2: TEdit
Left = 91
Top = 34
Width = 109
Height = 21
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ImeName = '中文 (简体) - 智能 ABC'
MaxLength = 20
ParentFont = False
TabOrder = 1
OnKeyDown = Edit2KeyDown
end
object Edit1: TEdit
Left = 91
Top = 199
Width = 31
Height = 21
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
MaxLength = 3
ParentFont = False
TabOrder = 7
OnExit = Edit1Exit
OnKeyDown = Edit1KeyDown
OnKeyPress = Edit1KeyPress
end
object Edit5: TEdit
Left = 91
Top = 172
Width = 31
Height = 21
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
MaxLength = 3
ParentFont = False
TabOrder = 6
OnExit = Edit5Exit
OnKeyDown = Edit5KeyDown
OnKeyPress = Edit5KeyPress
end
object Edit6: TEdit
Left = 91
Top = 117
Width = 31
Height = 21
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
MaxLength = 3
ParentFont = False
TabOrder = 4
OnExit = Edit6Exit
OnKeyDown = Edit6KeyDown
OnKeyPress = Edit6KeyPress
end
object DateTimePicker1: TDateTimePicker
Left = 91
Top = 62
Width = 109
Height = 21
CalAlignment = dtaLeft
Date = 37196.3923047338
Time = 37196.3923047338
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkTime
ParseInput = False
TabOrder = 2
end
object DateTimePicker2: TDateTimePicker
Left = 91
Top = 89
Width = 109
Height = 21
CalAlignment = dtaLeft
Date = 37196.3923499421
Time = 37196.3923499421
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkTime
ParseInput = False
TabOrder = 3
OnExit = DateTimePicker2Exit
end
object e_time: TEdit
Left = 91
Top = 144
Width = 31
Height = 21
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
MaxLength = 3
ParentFont = False
TabOrder = 5
OnKeyDown = e_timeKeyDown
OnKeyPress = e_timeKeyPress
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -