u_attendance.dfm

工作计划管理

          Width = 60
          Height = 13
          Caption = '时间范围：'
        end
        object Label12: TLabel
          Left = 24
          Top = 64
          Width = 48
          Height = 13
          Alignment = taRightJustify
          Caption = '员工号：'
        end
        object Label11: TLabel
          Left = 184
          Top = 24
          Width = 12
          Height = 13
          Caption = '至'
        end
        object Label13: TLabel
          Left = 328
          Top = 16
          Width = 60
          Height = 13
          Caption = '请假原因：'
        end
        object i_leave_start_time: TMaskEdit
          Left = 80
          Top = 20
          Width = 97
          Height = 21
          EditMask = '!0000-!90-90 !90:00;1;_'
          MaxLength = 16
          TabOrder = 0
          Text = '    -  -     :  '
        end
        object i_leave_person_id: TMaskEdit
          Left = 80
          Top = 60
          Width = 97
          Height = 21
          EditMask = '>L!00000;1;_'
          MaxLength = 6
          TabOrder = 1
          Text = '      '
          OnChange = i_leave_person_idChange
        end
        object B_leave_add: TButton
          Left = 544
          Top = 40
          Width = 75
          Height = 25
          Caption = '添加'
          TabOrder = 2
          OnClick = B_leave_addClick
        end
        object i_leave_person_name: TEdit
          Left = 200
          Top = 60
          Width = 97
          Height = 21
          Color = clSilver
          ReadOnly = True
          TabOrder = 3
        end
        object i_leave_end_time: TMaskEdit
          Left = 200
          Top = 20
          Width = 97
          Height = 21
          EditMask = '!0000-!90-90 !90:00;1;_'
          MaxLength = 16
          TabOrder = 4
          Text = '    -  -     :  '
        end
        object i_leave_reason: TMemo
          Left = 328
          Top = 32
          Width = 185
          Height = 49
          TabOrder = 5
        end
      end
      object DBGrid3: TDBGrid
        Left = 8
        Top = 136
        Width = 649
        Height = 177
        DataSource = DM_main.DS_leave
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'ID'
            ReadOnly = True
            Title.Caption = '记录编号'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PERSON'
            ReadOnly = True
            Title.Caption = '员工号'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'START_DAY'
            Title.Caption = '开始时间'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'END_DAY'
            Title.Caption = '结束时间'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'REASON'
            Title.Caption = '缘由'
            Visible = True
          end>
      end
      object B_seek_leave: TButton
        Left = 576
        Top = 112
        Width = 75
        Height = 25
        Caption = '按条件检索'
        TabOrder = 2
        OnClick = B_seek_leaveClick
      end
      object B_delete_leave: TButton
        Left = 472
        Top = 112
        Width = 91
        Height = 25
        Caption = '删除当前记录'
        TabOrder = 3
        OnClick = B_delete_leaveClick
      end
    end
    object TabSheet4: TTabSheet
      Caption = '出差记录'
      ImageIndex = 3
      OnShow = TabSheet4Show
      object Label8: TLabel
        Left = 8
        Top = 120
        Width = 84
        Height = 13
        Caption = '出勤记录列表：'
      end
      object GroupBox7: TGroupBox
        Left = 8
        Top = 8
        Width = 649
        Height = 97
        Caption = '添加记录'
        TabOrder = 0
        object Label29: TLabel
          Left = 16
          Top = 24
          Width = 60
          Height = 13
          Caption = '时间范围：'
        end
        object Label30: TLabel
          Left = 24
          Top = 64
          Width = 48
          Height = 13
          Alignment = taRightJustify
          Caption = '员工号：'
        end
        object Label31: TLabel
          Left = 184
          Top = 24
          Width = 12
          Height = 13
          Caption = '至'
        end
        object Label32: TLabel
          Left = 328
          Top = 16
          Width = 60
          Height = 13
          Caption = '具体描述：'
        end
        object i_errand_start_time: TMaskEdit
          Left = 80
          Top = 20
          Width = 97
          Height = 21
          EditMask = '!0000-!90-90 !90:00;1;_'
          MaxLength = 16
          TabOrder = 0
          Text = '    -  -     :  '
        end
        object i_errand_person_id: TMaskEdit
          Left = 80
          Top = 60
          Width = 97
          Height = 21
          EditMask = '>L!00000;1;_'
          MaxLength = 6
          TabOrder = 1
          Text = '      '
          OnChange = i_errand_person_idChange
        end
        object B_errand_add: TButton
          Left = 544
          Top = 40
          Width = 75
          Height = 25
          Caption = '添加'
          TabOrder = 2
          OnClick = B_errand_addClick
        end
        object i_errand_person_name: TEdit
          Left = 200
          Top = 60
          Width = 97
          Height = 21
          Color = clSilver
          ReadOnly = True
          TabOrder = 3
        end
        object i_errand_end_time: TMaskEdit
          Left = 200
          Top = 20
          Width = 97
          Height = 21
          EditMask = '!0000-!90-90 !90:00;1;_'
          MaxLength = 16
          TabOrder = 4
          Text = '    -  -     :  '
        end
        object i_errand_description: TMemo
          Left = 328
          Top = 32
          Width = 185
          Height = 49
          TabOrder = 5
        end
      end
      object DBGrid4: TDBGrid
        Left = 8
        Top = 136
        Width = 649
        Height = 177
        DataSource = DM_main.DS_errand
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'ID'
            ReadOnly = True
            Title.Caption = '记录编号'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PERSON'
            ReadOnly = True
            Title.Caption = '员工号'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'START_TIME'
            Title.Caption = '开始时间'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'END_TIME'
            Title.Caption = '结束时间'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'DESCRIPTION'
            Title.Caption = '具体描述'
            Visible = True
          end>
      end
      object B_seek_errand: TButton
        Left = 576
        Top = 112
        Width = 75
        Height = 25
        Caption = '按条件检索'
        TabOrder = 2
        OnClick = B_seek_errandClick
      end
      object B_delete_errand: TButton
        Left = 472
        Top = 112
        Width = 91
        Height = 25
        Caption = '删除当前记录'
        TabOrder = 3
        OnClick = B_delete_errandClick
      end
    end
  end
  object GroupBox9: TGroupBox
    Left = 32
    Top = 8
    Width = 625
    Height = 73
    Caption = '记录检索条件'
    TabOrder = 1
    object Label38: TLabel
      Left = 232
      Top = 48
      Width = 48
      Height = 13
      Caption = '员工号：'
    end
    object Label40: TLabel
      Left = 392
      Top = 24
      Width = 12
      Height = 13
      Caption = '至'
    end
    object Label42: TLabel
      Left = 380
      Top = 48
      Width = 36
      Height = 13
      Alignment = taRightJustify
      Caption = '姓名：'
    end
    object Label9: TLabel
      Left = 272
      Top = 24
      Width = 12
      Height = 13
      Caption = '从'
    end
    object Seek_start_time: TMaskEdit
      Left = 288
      Top = 20
      Width = 97
      Height = 21
      EditMask = '!0000-!90-90;1;_'
      MaxLength = 10
      TabOrder = 0
      Text = '    -  -  '
    end
    object Seek_end_time: TMaskEdit
      Left = 408
      Top = 20
      Width = 97
      Height = 21
      EditMask = '!0000-!90-90;1;_'
      MaxLength = 10
      TabOrder = 1
      Text = '    -  -  '
    end
    object Seek_person_id: TMaskEdit
      Left = 288
      Top = 44
      Width = 81
      Height = 21
      EditMask = '>L!99999;1;_'
      MaxLength = 6
      TabOrder = 2
      Text = '      '
      OnChange = Seek_person_idChange
    end
    object Seek_by_person: TCheckBox
      Left = 160
      Top = 46
      Width = 57
      Height = 17
      Caption = '员工'
      TabOrder = 3
    end
    object Seek_by_time: TCheckBox
      Left = 160
      Top = 22
      Width = 81
      Height = 17
      Caption = '时间范围'
      TabOrder = 4
    end
    object Seek_person_name: TEdit
      Left = 424
      Top = 44
      Width = 81
      Height = 21
      Color = clSilver
      ReadOnly = True
      TabOrder = 5
    end
  end
end