bjda.dfm

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

object FrmBjda: TFrmBjda
  Left = 471
  Top = 209
  BorderStyle = bsDialog
  Caption = #32534#36753#26723#26696#20449#24687
  ClientHeight = 412
  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 = #26723#26696#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 = 'DAXX_DAH'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DAXX_CLMC'
          Width = 94
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DAXX_CLFS'
          Width = 94
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DAXX_CLYS'
          Width = 79
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DAXX_ZCRQ'
          Width = 119
          Visible = True
        end>
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 240
    Width = 409
    Height = 129
    TabOrder = 1
    object Label1: TLabel
      Left = 16
      Top = 24
      Width = 49
      Height = 13
      AutoSize = False
      Caption = #26723#26696#21495
    end
    object Label2: TLabel
      Left = 216
      Top = 24
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #26448#26009#21517#31216
    end
    object TLabel
      Left = 8
      Top = 56
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #26448#26009#20221#25968
    end
    object Label4: TLabel
      Left = 216
      Top = 56
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #26448#26009#39029#25968
    end
    object Label5: TLabel
      Left = 8
      Top = 96
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #21046#25104#26085#26399
    end
    object DBEdtDah: TDBEdit
      Left = 64
      Top = 24
      Width = 113
      Height = 21
      DataField = 'DAXX_DAH'
      DataSource = DataSource1
      TabOrder = 0
    end
    object DBEdtClmc: TDBEdit
      Left = 280
      Top = 24
      Width = 97
      Height = 21
      DataField = 'DAXX_CLMC'
      DataSource = DataSource1
      TabOrder = 1
    end
    object DBEdtClfs: TDBEdit
      Left = 64
      Top = 56
      Width = 113
      Height = 21
      DataField = 'DAXX_CLFS'
      DataSource = DataSource1
      TabOrder = 2
    end
    object DBEdtClys: TDBEdit
      Left = 280
      Top = 56
      Width = 97
      Height = 21
      DataField = 'DAXX_CLYS'
      DataSource = DataSource1
      TabOrder = 3
    end
    object DBDTPZcrq: TDBDateTimePicker
      Left = 64
      Top = 96
      Width = 121
      Height = 21
      Date = 37997.853202673610000000
      Time = 37997.853202673610000000
      ShowCheckbox = True
      TabOrder = 4
      DataSource = DataSource1
      DataField = 'DAXX_ZCRQ'
      OnlyDate = True
    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 = #36820'  '#22238
    TabOrder = 3
    OnClick = Button1Click
  end
  object ADODataSet1: TADODataSet
    Connection = DataModule1.ADOConnection
    BeforePost = ADODataSet1BeforePost
    OnNewRecord = ADODataSet1NewRecord
    CommandText = 'select * from daxx'
    Parameters = <>
    Left = 368
    Top = 376
    object ADODataSet1DAXX_GH: TWideStringField
      DisplayLabel = #24037#21495
      FieldName = 'DAXX_GH'
      Size = 10
    end
    object ADODataSet1DAXX_DAH: TWideStringField
      DisplayLabel = #26723#26696#21495
      FieldName = 'DAXX_DAH'
      Size = 8
    end
    object ADODataSet1DAXX_CLMC: TWideStringField
      DisplayLabel = #26448#26009#21517#31216
      FieldName = 'DAXX_CLMC'
      Size = 50
    end
    object ADODataSet1DAXX_CLFS: TSmallintField
      DisplayLabel = #26448#26009#20221#25968
      FieldName = 'DAXX_CLFS'
    end
    object ADODataSet1DAXX_CLYS: TSmallintField
      DisplayLabel = #26448#26009#39029#25968
      FieldName = 'DAXX_CLYS'
    end
    object ADODataSet1DAXX_ZCRQ: TDateTimeField
      DisplayLabel = #21046#25104#26085#26399
      FieldName = 'DAXX_ZCRQ'
    end
  end
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Left = 400
    Top = 376
  end
  object ADODataSet2: TADODataSet
    Connection = DataModule1.ADOConnection
    Parameters = <>
    Left = 264
    Top = 376
  end
end