bjjz.dfm

人力资源管理系统（Delphi程序）大家学习共勉

object FrmBjjz: TFrmBjjz
  Left = 484
  Top = 227
  BorderStyle = bsDialog
  Caption = #32534#36753#20860#32844#20449#24687
  ClientHeight = 413
  ClientWidth = 426
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 409
    Height = 233
    Caption = #20860#32844#20449#24687
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 8
      Top = 16
      Width = 385
      Height = 209
      DataSource = DataSource1
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnTitleClick = DBGrid1TitleClick
      Columns = <
        item
          Expanded = False
          FieldName = 'JZXX_KSSJ'
          Title.Caption = #24320#22987#26085#26399
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'JZXX_ZZSJ'
          Title.Caption = #32467#26463#26085#26399
          Width = 94
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'JZXX_BMMC'
          Title.Caption = #20860#32844#37096#38376
          Width = 94
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'JZXX_GWMC'
          Title.Caption = #20860#32844#23703#20301
          Width = 79
          Visible = True
        end>
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 240
    Width = 409
    Height = 129
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 32
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #24320#22987#26085#26399
    end
    object Label2: TLabel
      Left = 224
      Top = 32
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #32467#26463#26085#26399
    end
    object Label3: TLabel
      Left = 8
      Top = 72
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #20860#32844#37096#38376
    end
    object Label4: TLabel
      Left = 224
      Top = 80
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #20860#32844#23703#20301
    end
    object DBDTPKsrq: TDBDateTimePicker
      Left = 72
      Top = 24
      Width = 105
      Height = 21
      Date = 37992.914563229170000000
      Time = 37992.914563229170000000
      ShowCheckbox = True
      TabOrder = 0
      DataSource = DataSource1
      DataField = 'JZXX_KSSJ'
      OnlyDate = True
    end
    object DBDTPJsrq: TDBDateTimePicker
      Left = 288
      Top = 24
      Width = 97
      Height = 21
      Date = 37992.914881747680000000
      Time = 37992.914881747680000000
      ShowCheckbox = True
      TabOrder = 1
      DataSource = DataSource1
      DataField = 'JZXX_ZZSJ'
      OnlyDate = True
    end
    object DBLookupCmbJzbm: TDBLookupComboBox
      Left = 72
      Top = 72
      Width = 105
      Height = 21
      DataField = 'JZXX_BMDM'
      DataSource = DataSource1
      KeyField = 'BMDM_DM'
      ListField = 'BMDM_MC'
      ListSource = DataModule1.DataSourceBmdm
      TabOrder = 2
    end
    object DBLookupCmbJZGW: TDBLookupComboBox
      Left = 288
      Top = 72
      Width = 97
      Height = 21
      DataField = 'JZXX_GWDM'
      DataSource = DataSource1
      KeyField = 'GWDM_DM'
      ListField = 'GWDM_MC'
      ListSource = DataModule1.DataSourceGwdm
      TabOrder = 3
    end
  end
  object DBNavigator1: TDBNavigator
    Left = 8
    Top = 376
    Width = 240
    Height = 25
    DataSource = DataSource1
    TabOrder = 2
  end
  object Button1: TButton
    Left = 296
    Top = 376
    Width = 75
    Height = 25
    Caption = #30830'  '#23450
    TabOrder = 3
    OnClick = Button1Click
  end
  object ADODataSet1: TADODataSet
    Connection = DataModule1.ADOConnection
    BeforePost = ADODataSet1BeforePost
    OnNewRecord = ADODataSet1NewRecord
    CommandText = 'select * from jzxx'
    Parameters = <>
    Left = 368
    Top = 376
    object ADODataSet1JZXX_GH: TWideStringField
      FieldName = 'JZXX_GH'
      Size = 10
    end
    object ADODataSet1JZXX_GWDM: TWideStringField
      FieldName = 'JZXX_GWDM'
      Size = 6
    end
    object ADODataSet1JZXX_BMDM: TWideStringField
      FieldName = 'JZXX_BMDM'
      Size = 6
    end
    object ADODataSet1JZXX_KSSJ: TDateTimeField
      FieldName = 'JZXX_KSSJ'
    end
    object ADODataSet1JZXX_ZZSJ: TDateTimeField
      FieldName = 'JZXX_ZZSJ'
    end
    object ADODataSet1JZXX_BMMC: TStringField
      DisplayLabel = #37096#38376#21517#31216
      DisplayWidth = 60
      FieldKind = fkLookup
      FieldName = 'JZXX_BMMC'
      LookupDataSet = DataModule1.ADODataSetBmdm
      LookupKeyFields = 'BMDM_DM'
      LookupResultField = 'BMDM_MC'
      KeyFields = 'JZXX_BMDM'
      Lookup = True
    end
    object ADODataSet1JZXX_GWMC: TStringField
      DisplayLabel = #23703#20301#21517#31216
      DisplayWidth = 60
      FieldKind = fkLookup
      FieldName = 'JZXX_GWMC'
      LookupDataSet = DataModule1.ADODataSetGwdm
      LookupKeyFields = 'GWDM_DM'
      LookupResultField = 'GWDM_MC'
      KeyFields = 'JZXX_GWDM'
      Lookup = True
    end
  end
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Left = 400
    Top = 376
  end
  object ADODataSet2: TADODataSet
    Connection = DataModule1.ADOConnection
    Parameters = <>
    Left = 280
    Top = 384
  end
end