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