time.dfm

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 313 行

inherited frmTime: TfrmTime
  Left = 1
  Top = 1
  Width = 797
  Height = 571
  Caption = '考勤汇总表'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Splitter1: TSplitter
    Top = 85
    Width = 789
  end
  inherited Panel2: TPanel
    Top = 88
    Width = 787
    Height = 434
    Align = alNone
  end
  inherited Panel3: TPanel
    Width = 789
    Height = 85
    inherited Splitter2: TSplitter
      Left = 708
      Height = 83
    end
    inherited GroupBox3: TGroupBox
      Width = 707
      Height = 83
      ParentCtl3D = False
      inherited edLable5: TLabel
        Left = 492
        Top = 31
        Width = 36
        Caption = '日期：'
      end
      inherited edLabel6: TLabel
        Left = 609
        Top = 28
      end
      object lbLabel4: TLabel [2]
        Left = 4
        Top = 33
        Width = 60
        Height = 12
        Caption = '部    门：'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object lbLabel6: TLabel [3]
        Left = 330
        Top = 33
        Width = 60
        Height = 12
        Caption = '考勤月份：'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object lPmpc: TLabel [4]
        Left = 160
        Top = 32
        Width = 60
        Height = 12
        Caption = '员    工：'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      inherited dtDateBg: TDateEdit
        Left = 523
        Top = 26
        Width = 86
        TabOrder = 1
      end
      inherited dtDateEn: TDateEdit
        Left = 622
        Top = 27
        Width = 85
        TabOrder = 5
      end
      object edDept: TSDEdit
        Left = 60
        Top = 28
        Width = 96
        Height = 20
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        BrowseNo = '11'
        OnButtonClick = edDeptButtonClick
        ButtonVisible = True
        SplitSymbol = ' | '
      end
      object cbsdMonth: TSDComboBox
        Left = 395
        Top = 27
        Width = 84
        Height = 20
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ItemHeight = 12
        ParentFont = False
        TabOrder = 2
      end
      object edDeptBox: TSDEdit
        Left = 157
        Top = 119
        Width = 17
        Height = 20
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        MaxLength = 1
        ParentFont = False
        TabOrder = 3
        Visible = False
        CharType = ctNumeric
        SplitSymbol = ' | '
      end
      object edEmployeeBox: TSDEdit
        Left = 378
        Top = 115
        Width = 17
        Height = 20
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        Visible = False
        SplitSymbol = ' | '
      end
      object sysFmonthBox: TSDEdit
        Left = 710
        Top = 8
        Width = 3
        Height = 21
        ParentColor = True
        TabOrder = 6
        Visible = False
        CharType = ctNumeric
        SplitSymbol = ' | '
      end
      object edEmployee: TSDEdit
        Left = 221
        Top = 26
        Width = 105
        Height = 21
        Color = clWhite
        TabOrder = 7
        OnButtonClick = edEmployeeButtonClick
        ButtonVisible = True
        SplitSymbol = ' | '
      end
    end
    inherited GroupBox2: TGroupBox
      Left = 711
      Width = 77
      Height = 83
      ParentCtl3D = False
      inherited btRest: TBitBtn
        Left = 7
        Top = 55
        Width = 64
        Height = 22
      end
      inherited btFind: TBitBtn
        Left = 7
        Top = 32
        Width = 64
        Height = 22
      end
      inherited BitBtn1: TBitBtn
        Left = 7
        Top = 8
        Width = 63
        Height = 23
      end
    end
  end
  inherited Panel1: TPanel
    Top = 525
    Width = 789
    Height = 19
    ParentCtl3D = False
    TabOrder = 3
    inherited sbBar: TStatusBar
      Top = -2
      Width = 787
    end
  end
  object TimeGrid: TSDGrid [4]
    Left = 0
    Top = 88
    Width = 789
    Height = 437
    Align = alClient
    ColCount = 8
    Ctl3D = False
    DefaultRowHeight = 18
    FixedColor = 8564917
    FixedCols = 0
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
    ParentCtl3D = False
    TabOrder = 2
    Columns = <
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -11
        ColumnFont.Name = 'MS Sans Serif'
        ColumnFont.Style = []
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -11
        ColumnFont.Name = 'MS Sans Serif'
        ColumnFont.Style = []
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -11
        ColumnFont.Name = 'MS Sans Serif'
        ColumnFont.Style = []
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -11
        ColumnFont.Name = 'MS Sans Serif'
        ColumnFont.Style = []
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -11
        ColumnFont.Name = 'MS Sans Serif'
        ColumnFont.Style = []
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -11
        ColumnFont.Name = 'MS Sans Serif'
        ColumnFont.Style = []
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -11
        ColumnFont.Name = 'MS Sans Serif'
        ColumnFont.Style = []
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -11
        ColumnFont.Name = 'MS Sans Serif'
        ColumnFont.Style = []
        ColumnWidth = 0
      end>
    ColWidths = (
      3
      63
      76
      77
      78
      82
      81
      84)
    RowHeights = (
      18
      18
      18
      18
      18)
  end
end