uoutfieldset.dfm

来自「说明: 比较简单的人事档案管理程序,包含了人事档案的大部分功能,做人事档案的兄」· DFM 代码 · 共 173 行

object Form_OutFieldSet: TForm_OutFieldSet
  Left = 503
  Top = 210
  Width = 240
  Height = 355
  Caption = #23548#20986#23383#27573#35774#32622
  Color = clWhite
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object SelectOk: TSpeedButton
    Left = 144
    Top = 296
    Width = 70
    Height = 28
    Caption = #20445#23384#35774#32622
    Flat = True
    OnClick = SelectOkClick
  end
  object AllNo: TSpeedButton
    Left = 72
    Top = 296
    Width = 70
    Height = 28
    Caption = #20840#19981#36873
    Flat = True
    OnClick = AllNoClick
  end
  object AllYes: TSpeedButton
    Left = 0
    Top = 296
    Width = 70
    Height = 28
    Hint = #20840#36873
    Caption = #20840#36873
    Flat = True
    OnClick = AllYesClick
  end
  object Label1: TLabel
    Left = 0
    Top = 8
    Width = 153
    Height = 13
    AutoSize = False
    Caption = #35831#22312#20320#35201#23548#20986#30340#23383#27573#30528#25171#21246
  end
  object FieldNameList: TCheckListBox
    Left = 0
    Top = 24
    Width = 225
    Height = 273
    HeaderBackgroundColor = clHotLight
    ItemHeight = 13
    Items.Strings = (
      #32534#21495
      #22995#21517
      #24615#21035
      #19968#32423#37096#38376
      #20108#32423#37096#38376
      #27665#26063
      #29983#26085
      #36523#20221#35777#21495
      #25919#27835#38754#35980
      #23130#23035
      #25945#32946#31243#24230
      #32844#24037#31867#22411
      #32844#31216
      #32844#21153
      #21442#21152#24037#20316#26085#26399
      #20837#26412#21333#20301#26085#26399
      #38134#34892#31867#22411
      #38134#34892#36134#21495
      #24037#36164#31867#22411
      #20859#32769#20445#38505#36134#21495
      #21307#30103#20445#38505#36134#21495
      #21512#21516#31867#22411
      #21512#21516#24320#22987#26085#26399
      #21512#21516#32467#26463#26085#26399
      #30005#35805#21495#30721
      #25163#26426#21495#30721
      #20854#23427#30005#35805
      #27605#19994#38498#26657
      'E-Mail'
      #20010#20154#20027#39029
      #31821#36143
      #29616#20303#22336
      #20154#20010#22791#27880
      #26412#20154#38271#39033
      #22522#26412#25910#20837)
    TabOrder = 0
    OnClick = FieldNameListClick
    OnDrawItem = FieldNameListDrawItem
  end
  object FieldList: TCheckListBox
    Left = 228
    Top = 24
    Width = 201
    Height = 273
    ItemHeight = 13
    Items.Strings = (
      'Employee_id'
      'Employee_Name'
      'Employee_Sex'
      'Employee_FirstDept'
      'Employee_SecondDept'
      'Employee_Folk'
      'Employee_Birthday'
      'Employee_IDCard'
      'Employee_Polity'
      'Employee_Marriage'
      'Employee_Educate'
      'Employee_Type'
      'Employee_post'
      'Employee_duty'
      'Employee_StartWorkDate'
      'Employee_JoinDate'
      'Employee_BankType'
      'Employee_BankNumber'
      'Employee_PayType'
      'Employee_Endowment'
      'Employee_Medicare'
      'Employee_Bargain'
      'Employee_BargainStart'
      'Employee_BargainStop'
      'Employee_Tel'
      'Employee_Moblie'
      'Employee_OtherTel'
      'Employee_School'
      'Employee_Email'
      'Employee_HomePage'
      'Employee_City'
      'Employee_NowAddress'
      'Employee_Memo'
      'Employee_text'
      'Employee_number')
    TabOrder = 1
    Visible = False
  end
  object SelectNumber: TEdit
    Left = 0
    Top = 328
    Width = 209
    Height = 21
    TabOrder = 2
    Text = 'SelectNumber'
    Visible = False
  end
  object SelectSQL: TEdit
    Left = 0
    Top = 352
    Width = 209
    Height = 21
    TabOrder = 3
    Text = 'SelectSQL'
    Visible = False
  end
  object EdUserName: TEdit
    Left = 0
    Top = 376
    Width = 209
    Height = 21
    TabOrder = 4
    Text = 'EdUserName'
    Visible = False
  end
end