📄 gz_dwxx_unit.dfm

📁 通用人力资源系统,分类可以自设定可以熟练掌握DELPHI语言
💻 DFM
字号:
object gz_dwxx: Tgz_dwxx
  Left = 229
  Top = 125
  Width = 548
  Height = 480
  Caption = #34218#36164#65293'>'#21333#20301#20449#24687#32500#25252
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 0
    Top = 325
    Width = 540
    Height = 3
    Cursor = crVSplit
    Align = alBottom
  end
  object Splitter2: TSplitter
    Left = 0
    Top = 177
    Width = 540
    Height = 3
    Cursor = crVSplit
    Align = alTop
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 434
    Width = 540
    Height = 19
    Panels = <>
  end
  object Panel1: TPanel
    Left = 0
    Top = 328
    Width = 540
    Height = 106
    Align = alBottom
    TabOrder = 1
    object Label1: TLabel
      Left = 16
      Top = 8
      Width = 40
      Height = 13
      AutoSize = False
      Caption = #21333#20301
    end
    object Label2: TLabel
      Left = 16
      Top = 40
      Width = 40
      Height = 13
      AutoSize = False
      Caption = #37096#38376
    end
    object Label3: TLabel
      Left = 16
      Top = 72
      Width = 40
      Height = 13
      AutoSize = False
      Caption = #29677#32452
    end
    object cb_dw: TComboBox
      Left = 56
      Top = 8
      Width = 145
      Height = 21
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 0
      OnChange = cb_dwChange
    end
    object cb_fc: TComboBox
      Left = 56
      Top = 40
      Width = 145
      Height = 21
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 1
      OnChange = cb_fcChange
    end
    object cb_bz: TComboBox
      Left = 56
      Top = 72
      Width = 145
      Height = 21
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 2
    end
    object Button1: TButton
      Left = 224
      Top = 8
      Width = 75
      Height = 25
      Caption = #28155#21152#21333#20301
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 224
      Top = 40
      Width = 75
      Height = 25
      Caption = #28155#21152#37096#38376
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = Button2Click
    end
    object Button3: TButton
      Left = 224
      Top = 72
      Width = 75
      Height = 25
      Caption = #28155#21152#29677#32452
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnClick = Button3Click
    end
    object Button4: TButton
      Left = 328
      Top = 8
      Width = 75
      Height = 25
      Caption = #21024#38500#21333#20301
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      OnClick = Button4Click
    end
    object Button5: TButton
      Left = 328
      Top = 40
      Width = 75
      Height = 25
      Caption = #21024#38500#37096#38376
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 7
      OnClick = Button5Click
    end
    object Button6: TButton
      Left = 328
      Top = 72
      Width = 75
      Height = 25
      Caption = #21024#38500#29677#32452
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 8
      OnClick = Button6Click
    end
    object Button7: TButton
      Left = 424
      Top = 8
      Width = 75
      Height = 25
      Caption = #25171#21360#21333#20301#34920
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 9
      OnClick = Button7Click
    end
    object Button8: TButton
      Left = 424
      Top = 40
      Width = 75
      Height = 25
      Caption = #25171#21360#37096#38376#34920
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 10
      OnClick = Button8Click
    end
    object Button9: TButton
      Left = 424
      Top = 72
      Width = 75
      Height = 25
      Caption = #25171#21360#29677#32452#34920
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 11
      OnClick = Button9Click
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 540
    Height = 177
    Align = alTop
    TabOrder = 2
    object DBGridEh1: TDBGridEh
      Left = 1
      Top = 1
      Width = 177
      Height = 175
      Align = alLeft
      AllowedOperations = [alopUpdateEh]
      DataSource = DataSource1
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      FooterColor = clWindow
      FooterFont.Charset = GB2312_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -13
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection]
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      UseMultiTitle = True
      Columns = <
        item
          EditButtons = <>
          FieldName = 'Dw'
          Footers = <>
          Title.Caption = #21333#20301#21015#34920'|'#21517#31216
        end>
    end
    object DBGridEh2: TDBGridEh
      Left = 178
      Top = 1
      Width = 320
      Height = 175
      Align = alLeft
      AllowedOperations = [alopUpdateEh]
      DataSource = DataSource2
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      FooterColor = clWindow
      FooterFont.Charset = GB2312_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -13
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection]
      ParentFont = False
      ReadOnly = True
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      UseMultiTitle = True
      Columns = <
        item
          EditButtons = <>
          FieldName = 'Bmlb'
          Footers = <>
          Title.Caption = #37096#38376#65288#20998#21378#65289#21015#34920'|'#25152#23646#21333#20301
        end
        item
          EditButtons = <>
          FieldName = 'Bmmc'
          Footers = <>
          Title.Caption = #37096#38376#65288#20998#21378#65289#21015#34920'|'#31185#23460#12289#29677#32452
        end>
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 180
    Width = 540
    Height = 145
    Align = alClient
    TabOrder = 3
    object DBGridEh3: TDBGridEh
      Left = 1
      Top = 1
      Width = 496
      Height = 143
      Align = alLeft
      AllowedOperations = [alopUpdateEh]
      DataSource = DataSource3
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      FooterColor = clWindow
      FooterFont.Charset = GB2312_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -13
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection]
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      UseMultiTitle = True
      Columns = <
        item
          EditButtons = <>
          FieldName = 'Lbmc'
          Footers = <>
          Title.Caption = #31185#23460#65288#29677#32452#65289#21015#34920'|'#25152#23646#21333#20301
        end
        item
          EditButtons = <>
          FieldName = 'Fcmc'
          Footers = <>
          Title.Caption = #31185#23460#65288#29677#32452#65289#21015#34920'|'#25152#23646#37096#38376
        end
        item
          EditButtons = <>
          FieldName = 'Bzmc'
          Footers = <>
          Title.Caption = #31185#23460#65288#29677#32452#65289#21015#34920'|'#29677#32452#21517#31216
        end>
    end
  end
  object tb_dw: TTable
    Active = True
    DatabaseName = 'gz'
    TableName = 'rl_dw.db'
    Left = 56
    Top = 8
  end
  object tb_fc: TTable
    Active = True
    DatabaseName = 'gz'
    TableName = 'rlbm.DB'
    Left = 112
    Top = 8
  end
  object tb_bz: TTable
    Active = True
    DatabaseName = 'gz'
    TableName = 'rlbz.DB'
    Left = 160
    Top = 8
  end
  object DataSource1: TDataSource
    DataSet = tb_dw
    Left = 64
    Top = 48
  end
  object DataSource2: TDataSource
    DataSet = tb_fc
    Left = 120
    Top = 48
  end
  object DataSource3: TDataSource
    DataSet = tb_bz
    Left = 168
    Top = 48
  end
  object p_dw: TPrintDBGridEh
    DBGridEh = DBGridEh1
    Options = []
    Page.BottomMargin = 2.000000000000000000
    Page.LeftMargin = 2.000000000000000000
    Page.RightMargin = 2.000000000000000000
    Page.TopMargin = 2.000000000000000000
    PageFooter.Font.Charset = DEFAULT_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -11
    PageFooter.Font.Name = 'MS Sans Serif'
    PageFooter.Font.Style = []
    PageHeader.Font.Charset = DEFAULT_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -11
    PageHeader.Font.Name = 'MS Sans Serif'
    PageHeader.Font.Style = []
    Units = MM
    Left = 72
    Top = 88
  end
  object p_fc: TPrintDBGridEh
    DBGridEh = DBGridEh2
    Options = []
    Page.BottomMargin = 2.000000000000000000
    Page.LeftMargin = 2.000000000000000000
    Page.RightMargin = 2.000000000000000000
    Page.TopMargin = 2.000000000000000000
    PageFooter.Font.Charset = DEFAULT_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -11
    PageFooter.Font.Name = 'MS Sans Serif'
    PageFooter.Font.Style = []
    PageHeader.Font.Charset = DEFAULT_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -11
    PageHeader.Font.Name = 'MS Sans Serif'
    PageHeader.Font.Style = []
    Units = MM
    Left = 128
    Top = 96
  end
  object p_bz: TPrintDBGridEh
    DBGridEh = DBGridEh3
    Options = []
    Page.BottomMargin = 2.000000000000000000
    Page.LeftMargin = 2.000000000000000000
    Page.RightMargin = 2.000000000000000000
    Page.TopMargin = 2.000000000000000000
    PageFooter.Font.Charset = DEFAULT_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -11
    PageFooter.Font.Name = 'MS Sans Serif'
    PageFooter.Font.Style = []
    PageHeader.Font.Charset = DEFAULT_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -11
    PageHeader.Font.Name = 'MS Sans Serif'
    PageHeader.Font.Style = []
    Units = MM
    Left = 176
    Top = 96
  end
end
⌨️ 快捷键说明

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