📄 tiaoban2.dfm

📁 企业员工考勤和工资管理系统
💻 DFM
字号:
object FormTiaoBan2: TFormTiaoBan2
  Left = 19
  Top = 16
  Width = 761
  Height = 554
  Caption = '调班'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object BitBtnSave: TBitBtn
    Left = 167
    Top = 494
    Width = 113
    Height = 25
    Caption = '保存(&S)'
    Enabled = False
    TabOrder = 0
    OnClick = BitBtnSaveClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333388F3333333333000033334224333333333333
      338338F3333333330000333422224333333333333833338F3333333300003342
      222224333333333383333338F3333333000034222A22224333333338F338F333
      8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
      33333338F83338F338F33333000033A33333A222433333338333338F338F3333
      0000333333333A222433333333333338F338F33300003333333333A222433333
      333333338F338F33000033333333333A222433333333333338F338F300003333
      33333333A222433333333333338F338F00003333333333333A22433333333333
      3338F38F000033333333333333A223333333333333338F830000333333333333
      333A333333333333333338330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object BitBtnQuit: TBitBtn
    Left = 439
    Top = 494
    Width = 118
    Height = 25
    Caption = '退出(&Q)'
    TabOrder = 1
    OnClick = BitBtnQuitClick
    Kind = bkClose
  end
  object GroupBox2: TGroupBox
    Left = 4
    Top = 5
    Width = 747
    Height = 44
    Caption = '调班信息'
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    object Label2: TLabel
      Left = 406
      Top = 20
      Width = 60
      Height = 12
      Caption = '调班人员：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object LabelPbfs: TLabel
      Left = 472
      Top = 20
      Width = 76
      Height = 16
      AutoSize = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label4: TLabel
      Left = 555
      Top = 20
      Width = 36
      Height = 12
      Caption = '名称：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object LabelName: TLabel
      Left = 593
      Top = 20
      Width = 147
      Height = 16
      AutoSize = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label1: TLabel
      Left = 11
      Top = 21
      Width = 84
      Height = 12
      Caption = '调班时间：  从'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 201
      Top = 21
      Width = 12
      Height = 12
      Caption = '到'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object LabelStart: TLabel
      Left = 100
      Top = 19
      Width = 96
      Height = 16
      AutoSize = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object LabelEnd: TLabel
      Left = 220
      Top = 19
      Width = 96
      Height = 16
      AutoSize = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label6: TLabel
      Left = 321
      Top = 21
      Width = 12
      Height = 12
      Caption = '共'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 368
      Top = 21
      Width = 12
      Height = 12
      Caption = '天'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object LabelDayCount: TLabel
      Left = 338
      Top = 19
      Width = 7
      Height = 12
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object BitBtnCancel: TBitBtn
    Left = 301
    Top = 494
    Width = 121
    Height = 25
    Cancel = True
    Caption = '取消(&C)'
    Enabled = False
    TabOrder = 3
    OnClick = BitBtnCancelClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333333333000033338833333333333333333F333333333333
      0000333911833333983333333388F333333F3333000033391118333911833333
      38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
      911118111118333338F3338F833338F3000033333911111111833333338F3338
      3333F8330000333333911111183333333338F333333F83330000333333311111
      8333333333338F3333383333000033333339111183333333333338F333833333
      00003333339111118333333333333833338F3333000033333911181118333333
      33338333338F333300003333911183911183333333383338F338F33300003333
      9118333911183333338F33838F338F33000033333913333391113333338FF833
      38F338F300003333333333333919333333388333338FFF830000333333333333
      3333333333333333333888330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object DBGrid1: TDBGrid
    Left = 4
    Top = 52
    Width = 746
    Height = 397
    Hint = '双击选择进行调班'
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ReadOnly = True
    ShowHint = True
    TabOrder = 4
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clHighlight
    TitleFont.Height = -13
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDblClick = DBGrid1DblClick
    Columns = <
      item
        Expanded = False
        FieldName = 'ygbh'
        Title.Alignment = taCenter
        Title.Caption = '员工编号'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Width = 50
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ygxm'
        Title.Alignment = taCenter
        Title.Caption = '姓名'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Width = 50
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'bmmc'
        Title.Alignment = taCenter
        Title.Caption = '部门'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Width = 70
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'bzmc'
        Title.Alignment = taCenter
        Title.Caption = '班组'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Width = 70
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'riqi'
        Title.Alignment = taCenter
        Title.Caption = '日期'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Width = 70
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'jiari'
        Title.Alignment = taCenter
        Title.Caption = '是否假日'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Width = 50
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'banci'
        Title.Alignment = taCenter
        Title.Caption = '班次'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'xiuxi'
        Title.Alignment = taCenter
        Title.Caption = '是否休息'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Width = 50
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'sds'
        Title.Alignment = taCenter
        Title.Caption = '时段数'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'sd11'
        Title.Alignment = taCenter
        Title.Caption = '时段1上班'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'sd12'
        Title.Alignment = taCenter
        Title.Caption = '时段1下班'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'sd21'
        Title.Alignment = taCenter
        Title.Caption = '时段2上班'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'sd22'
        Title.Alignment = taCenter
        Title.Caption = '时段2下班'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'sd31'
        Title.Alignment = taCenter
        Title.Caption = '时段3上班'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'sd32'
        Title.Alignment = taCenter
        Title.Caption = '时段3下班'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clHighlight
        Title.Font.Height = -12
        Title.Font.Name = '宋体'
        Title.Font.Style = []
        Visible = True
      end>
  end
  object DBNavigator1: TDBNavigator
    Left = 169
    Top = 461
    Width = 388
    Height = 23
    DataSource = DataSource1
    VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
    Hints.Strings = (
      '第一条'
      '前一条'
      '下一条'
      '最后一条')
    ParentShowHint = False
    ShowHint = True
    TabOrder = 5
  end
  object DataSource1: TDataSource
    DataSet = DataModal1.QPbYg
    Left = 688
    Top = 104
  end
end
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -