joad.dfm

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

DFM
262
字号
inherited frmJoad: TfrmJoad
  Left = 65
  Top = 20
  Width = 670
  Height = 547
  Caption = '人事流动汇总表'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Splitter1: TSplitter
    Top = 85
    Width = 662
  end
  inherited Panel2: TPanel
    Top = 88
    Width = 662
    Height = 413
  end
  inherited Panel3: TPanel
    Width = 662
    Height = 85
    inherited Splitter2: TSplitter
      Left = 581
      Height = 83
    end
    inherited GroupBox3: TGroupBox
      Width = 580
      Height = 83
      ParentCtl3D = False
      inherited edLable5: TLabel
        Left = 342
        Top = 41
        Width = 36
        Caption = '日期:'
      end
      inherited edLabel6: TLabel
        Left = 465
        Top = 41
      end
      object lbLabel4: TLabel [2]
        Left = 4
        Top = 41
        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 = 170
        Top = 41
        Width = 54
        Height = 12
        Caption = '月   份:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      inherited dtDateBg: TDateEdit
        Left = 377
        Top = 36
        Width = 86
        TabOrder = 1
      end
      inherited dtDateEn: TDateEdit
        Left = 481
        Top = 37
        Width = 85
        TabOrder = 3
      end
      object edDept: TSDEdit
        Left = 68
        Top = 36
        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 = 231
        Top = 36
        Width = 98
        Height = 20
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ItemHeight = 12
        ParentFont = False
        TabOrder = 2
      end
      object sysFmonthBox: TSDEdit
        Left = 710
        Top = 8
        Width = 3
        Height = 21
        ParentColor = True
        TabOrder = 4
        Visible = False
        CharType = ctNumeric
        SplitSymbol = ' | '
      end
      object edDeptBox: TSDEdit
        Left = 197
        Top = 84
        Width = 17
        Height = 18
        Color = clWhite
        Ctl3D = False
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        MaxLength = 1
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 5
        Visible = False
        CharType = ctNumeric
        SplitSymbol = ' | '
      end
    end
    inherited GroupBox2: TGroupBox
      Left = 584
      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 = 501
    Width = 662
    Height = 19
    ParentCtl3D = False
    TabOrder = 3
    inherited sbBar: TStatusBar
      Top = -2
      Width = 660
    end
  end
  object JoadGrid: TSDGrid [4]
    Left = 0
    Top = 88
    Width = 662
    Height = 413
    Align = alClient
    ColCount = 6
    Ctl3D = False
    DefaultColWidth = 80
    DefaultRowHeight = 18
    FixedColor = 8564917
    FixedCols = 0
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
    ParentCtl3D = False
    TabOrder = 2
    OnDblClick = JoadGridDblClick
    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>
    ColWidths = (
      7
      102
      103
      102
      121
      116)
    RowHeights = (
      18
      18
      18
      18
      18)
  end
  inherited AdvReport: TAdvReport
    Left = 384
    Top = 59
  end
end

⌨️ 快捷键说明

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