bjpx.dfm

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

object FrmBjpx: TFrmBjpx
  Left = 452
  Top = 137
  BorderStyle = bsDialog
  Caption = #32534#36753#22521#35757#20449#24687
  ClientHeight = 468
  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 = #22521#35757#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 = 'PXXX_PXNR'
          Width = 69
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PXXX_PXNR'
          Width = 76
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PXXX_PXXZ'
          Width = 71
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PXXX_KSSJ'
          Width = 61
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PXXX_JSSJ'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PXXX_PXDD'
          Width = 77
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PXXX_ZBDW'
          Width = 73
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PXXX_WCQK'
          Width = 76
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PXXX_ZSHM'
          Visible = True
        end>
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 240
    Width = 409
    Height = 185
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 24
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #22521#35757#21517#31216
    end
    object Label2: TLabel
      Left = 208
      Top = 24
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #22521#35757#20869#23481
    end
    object Label3: TLabel
      Left = 8
      Top = 56
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #22521#35757#24615#36136
    end
    object Label4: TLabel
      Left = 208
      Top = 88
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #32467#26463#26102#38388
    end
    object Label5: TLabel
      Left = 208
      Top = 56
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #22521#35757#22320#28857
    end
    object Label6: TLabel
      Left = 8
      Top = 88
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #24320#22987#26102#38388
    end
    object Label7: TLabel
      Left = 8
      Top = 120
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #20027#21150#21333#20301
    end
    object Label8: TLabel
      Left = 208
      Top = 120
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #23436#25104#24773#20917
    end
    object Label9: TLabel
      Left = 8
      Top = 152
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #35777#20070#21495#30721
    end
    object DBDTPKsrq: TDBDateTimePicker
      Left = 72
      Top = 80
      Width = 105
      Height = 21
      Date = 37992.914563229170000000
      Time = 37992.914563229170000000
      ShowCheckbox = True
      TabOrder = 0
      DataSource = DataSource1
      DataField = 'PXXX_KSSJ'
      OnlyDate = True
    end
    object DBDTPJsrq: TDBDateTimePicker
      Left = 272
      Top = 80
      Width = 97
      Height = 21
      Date = 37992.914881747680000000
      Time = 37992.914881747680000000
      ShowCheckbox = True
      TabOrder = 1
      DataSource = DataSource1
      DataField = 'PXXX_JSSJ'
      OnlyDate = True
    end
    object DBEdtPxmc: TDBEdit
      Left = 72
      Top = 16
      Width = 121
      Height = 21
      DataField = 'PXXX_PXMC'
      DataSource = DataSource1
      TabOrder = 2
    end
    object DBEdtPxnr: TDBEdit
      Left = 272
      Top = 16
      Width = 105
      Height = 21
      DataField = 'PXXX_PXNR'
      DataSource = DataSource1
      TabOrder = 3
    end
    object DBEdtPxxz: TDBEdit
      Left = 72
      Top = 48
      Width = 121
      Height = 21
      DataField = 'PXXX_PXXZ'
      DataSource = DataSource1
      TabOrder = 4
    end
    object DBEdtPxdd: TDBEdit
      Left = 272
      Top = 48
      Width = 105
      Height = 21
      DataField = 'PXXX_PXDD'
      DataSource = DataSource1
      TabOrder = 5
    end
    object DBEdtZbdw: TDBEdit
      Left = 72
      Top = 120
      Width = 121
      Height = 21
      DataField = 'PXXX_ZBDW'
      DataSource = DataSource1
      TabOrder = 6
    end
    object DBEdtWcqk: TDBEdit
      Left = 272
      Top = 120
      Width = 105
      Height = 21
      DataField = 'PXXX_WCQK'
      DataSource = DataSource1
      TabOrder = 7
    end
    object DBEdtZshm: TDBEdit
      Left = 72
      Top = 152
      Width = 121
      Height = 21
      DataField = 'PXXX_ZSHM'
      DataSource = DataSource1
      TabOrder = 8
    end
  end
  object DBNavigator1: TDBNavigator
    Left = 8
    Top = 432
    Width = 240
    Height = 25
    DataSource = DataSource1
    TabOrder = 2
  end
  object Button1: TButton
    Left = 296
    Top = 432
    Width = 75
    Height = 25
    Caption = #36820'  '#22238
    TabOrder = 3
    OnClick = Button1Click
  end
  object ADODataSet1: TADODataSet
    Connection = DataModule1.ADOConnection
    BeforeInsert = ADODataSet1BeforeInsert
    BeforePost = ADODataSet1BeforePost
    OnNewRecord = ADODataSet1NewRecord
    CommandText = 'select * from pxxx'
    Parameters = <>
    Left = 400
    Top = 432
    object ADODataSet1PXXX_GH: TWideStringField
      DisplayLabel = #24037#21495
      FieldName = 'PXXX_GH'
      Size = 10
    end
    object ADODataSet1PXXX_PXMC: TWideStringField
      DisplayLabel = #22521#35757#21517#31216
      FieldName = 'PXXX_PXMC'
      Size = 50
    end
    object ADODataSet1PXXX_PXNR: TWideStringField
      DisplayLabel = #22521#35757#20869#23481
      FieldName = 'PXXX_PXNR'
      Size = 200
    end
    object ADODataSet1PXXX_PXXZ: TWideStringField
      DisplayLabel = #22521#35757#24615#36136
      FieldName = 'PXXX_PXXZ'
    end
    object ADODataSet1PXXX_KSSJ: TDateTimeField
      DisplayLabel = #24320#22987#26102#38388
      FieldName = 'PXXX_KSSJ'
    end
    object ADODataSet1PXXX_JSSJ: TDateTimeField
      DisplayLabel = #32467#26463#26102#38388
      FieldName = 'PXXX_JSSJ'
    end
    object ADODataSet1PXXX_PXDD: TWideStringField
      DisplayLabel = #22521#35757#22320#28857
      FieldName = 'PXXX_PXDD'
      Size = 40
    end
    object ADODataSet1PXXX_ZBDW: TWideStringField
      DisplayLabel = #20027#21150#21333#20301
      FieldName = 'PXXX_ZBDW'
      Size = 50
    end
    object ADODataSet1PXXX_WCQK: TWideStringField
      DisplayLabel = #23436#25104#24773#20917
      FieldName = 'PXXX_WCQK'
    end
    object ADODataSet1PXXX_ZSHM: TWideStringField
      DisplayLabel = #35777#20070#21495#30721
      FieldName = 'PXXX_ZSHM'
    end
  end
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Left = 368
    Top = 432
  end
  object ADODataSet2: TADODataSet
    Connection = DataModule1.ADOConnection
    Parameters = <>
    Left = 264
    Top = 432
  end
end