📄 u_kqgl.~dfm
字号:
object SpeedButton7: TSpeedButton
Left = 173
Top = 48
Width = 23
Height = 22
Caption = '...'
OnClick = SpeedButton7Click
end
object SpeedButton8: TSpeedButton
Left = 173
Top = 88
Width = 23
Height = 22
Caption = '...'
OnClick = SpeedButton8Click
end
object SpeedButton9: TSpeedButton
Left = 173
Top = 128
Width = 23
Height = 22
Caption = '...'
OnClick = SpeedButton9Click
end
object Label10: TLabel
Left = 231
Top = 213
Width = 84
Height = 13
Caption = #25171#21345#21407#22987#25976#25818' :'
Font.Charset = CHINESEBIG5_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #26032#32048#26126#39636
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 552
Top = 40
Width = 197
Height = 48
Caption = #32771#21220#34389#29702
Font.Charset = CHINESEBIG5_CHARSET
Font.Color = clWindowText
Font.Height = -48
Font.Name = #27161#26999#39636
Font.Style = [fsBold]
ParentFont = False
end
object Bevel1: TBevel
Left = 216
Top = 8
Width = 281
Height = 33
end
object SpeedButton10: TSpeedButton
Left = 224
Top = 16
Width = 65
Height = 22
Cursor = crHandPoint
Caption = #37325#26032#25490#29677
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = N15Click
end
object SpeedButton11: TSpeedButton
Left = 290
Top = 16
Width = 65
Height = 22
Cursor = crHandPoint
Caption = #20877#20998#26512
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = N43Click
end
object SpeedButton12: TSpeedButton
Left = 355
Top = 16
Width = 65
Height = 22
Cursor = crHandPoint
Caption = #25163#21205#25490#21015
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = N42Click
end
object SpeedButton13: TSpeedButton
Left = 420
Top = 16
Width = 65
Height = 22
Cursor = crHandPoint
Caption = #37325#26032#25972#29702
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = N19Click
end
object DBGrid2: TDBGrid
Left = 216
Top = 48
Width = 281
Height = 156
DataSource = DS_data
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 7
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'machine_num'
Width = 39
Visible = True
end
item
Expanded = False
FieldName = 'card_num'
Visible = True
end
item
Expanded = False
FieldName = 'date_YMD'
Visible = True
end
item
Expanded = False
FieldName = 'date_T'
Width = 42
Visible = True
end
item
Expanded = False
FieldName = 'check_char'
Visible = True
end>
end
object MaskEdit1: TMaskEdit
Left = 282
Top = 238
Width = 76
Height = 24
EditMask = '!9999/99/00;1;_'
MaxLength = 10
TabOrder = 0
Text = ' / / '
OnChange = MaskEdit1Change
OnDblClick = MaskEdit1DblClick
OnMouseUp = MaskEdit1MouseUp
end
object RadioGroup1: TRadioGroup
Left = 512
Top = 127
Width = 121
Height = 98
Caption = #20197'......'#31721#36984
ItemIndex = 0
Items.Strings = (
#20108#32026#37096#38272#21517#31281
#21729#24037#22995#21517
#21729#24037#24037#34399
#19968#32026#37096#38272)
TabOrder = 1
OnClick = RadioGroup1Click
end
object Edit1: TEdit
Left = 650
Top = 149
Width = 77
Height = 24
TabOrder = 2
OnKeyPress = Edit1KeyPress
end
object BitBtn1: TBitBtn
Left = 704
Top = 234
Width = 73
Height = 25
Caption = #21034#38500
TabOrder = 3
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
333333333333337FF3333333333333903333333333333377FF33333333333399
03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
3333777777333333333333333333333333333333333333333333}
Layout = blGlyphRight
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 641
Top = 204
Width = 113
Height = 25
Caption = #25171#21360#21047#21345#39006#22411
TabOrder = 4
OnClick = BitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
Layout = blGlyphRight
NumGlyphs = 2
end
object CheckBox1: TCheckBox
Left = 401
Top = 242
Width = 57
Height = 17
Caption = #21040#36889#22825
TabOrder = 5
end
object MaskEdit2: TMaskEdit
Left = 466
Top = 238
Width = 76
Height = 24
EditMask = '!9999/99/00;1;_'
MaxLength = 10
TabOrder = 6
Text = ' / / '
OnDblClick = MaskEdit2DblClick
OnMouseUp = MaskEdit2MouseUp
end
object ComboBox1: TComboBox
Left = 61
Top = 8
Width = 113
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 8
OnChange = ComboBox1Change
end
object ComboBox2: TComboBox
Left = 61
Top = 48
Width = 113
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 9
OnChange = ComboBox2Change
end
object ComboBox3: TComboBox
Left = 61
Top = 88
Width = 113
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 10
OnClick = ComboBox3Click
end
object ComboBox4: TComboBox
Left = 61
Top = 128
Width = 113
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 11
OnChange = ComboBox4Change
OnClick = ComboBox4Click
OnKeyPress = ComboBox4KeyPress
end
object BitBtn3: TBitBtn
Left = 328
Top = 209
Width = 75
Height = 23
Caption = #21069#19968#22825
TabOrder = 12
OnClick = BitBtn3Click
end
object BitBtn4: TBitBtn
Left = 408
Top = 209
Width = 75
Height = 23
Caption = #24460#19968#22825
TabOrder = 13
OnClick = BitBtn4Click
end
object DBGrid3: TDBGrid
Left = 3
Top = 161
Width = 193
Height = 102
BorderStyle = bsNone
DataSource = DataSource1
Options = [dgTitles, dgColumnResize, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 14
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'name'
Visible = True
end
item
Expanded = False
FieldName = 'ht_name'
Width = 58
Visible = True
end
item
Expanded = False
FieldName = 'times'
Width = 64
Visible = True
end
item
Expanded = False
FieldName = 'ht_date'
Width = 64
Visible = True
end
item
Expanded = False
FieldName = 'begin_time'
Width = 64
Visible = True
end
item
Expanded = False
FieldName = 'end_time'
Width = 64
Visible = True
end>
end
object BitBtn5: TBitBtn
Left = 616
Top = 235
Width = 81
Height = 25
Caption = #26159#27491#24120#19978#29677
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -