unit3.dfm

一个建立在BDE引擎上的

object Form3: TForm3
  Left = 30
  Top = 12
  BorderStyle = bsNone
  Caption = 'Form3'
  ClientHeight = 539
  ClientWidth = 736
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Backdrop1: TBackdrop
    Left = 0
    Top = 0
    Width = 736
    Height = 539
    EndColor = clWhite
    StartColor = 16744576
    TabOrder = 0
    object Label1: TLabel
      Left = 80
      Top = 48
      Width = 97
      Height = 13
      AutoSize = False
      Caption = '按部门名称查询'
      Transparent = True
    end
    object Label2: TLabel
      Left = 80
      Top = 96
      Width = 97
      Height = 13
      AutoSize = False
      Caption = '按科室名称查询'
      Transparent = True
    end
    object Label3: TLabel
      Left = 80
      Top = 144
      Width = 97
      Height = 13
      AutoSize = False
      Caption = '按人员姓名查询'
      Transparent = True
    end
    object Label4: TLabel
      Left = 80
      Top = 192
      Width = 97
      Height = 13
      AutoSize = False
      Caption = '按人员职位查询'
      Transparent = True
    end
    object Label5: TLabel
      Left = 80
      Top = 240
      Width = 97
      Height = 13
      AutoSize = False
      Caption = '按人员年龄查询'
      Transparent = True
    end
    object Label6: TLabel
      Left = 232
      Top = 240
      Width = 24
      Height = 13
      Caption = '-->'
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object DBGrid8: TDBGrid
      Left = 0
      Top = 311
      Width = 736
      Height = 228
      DataSource = DataSource1
      Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'RD'
          Title.Caption = '工号'
          Width = 46
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'RName'
          Title.Caption = '姓名'
          Width = 41
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'RSex'
          Title.Caption = '性别'
          Width = 25
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'RAge'
          Title.Caption = '年龄'
          Width = 25
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'RXue'
          Title.Caption = '学历'
          Width = 34
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Rjg'
          Title.Caption = '籍贯'
          Width = 51
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Rborn'
          Title.Caption = '出生年月'
          Width = 54
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Rxian'
          Title.Caption = '工作经验'
          Width = 49
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Rwei'
          Title.Caption = '职位'
          Width = 48
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Rtel'
          Title.Caption = '住宅电话'
          Width = 70
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Rstel'
          Title.Caption = '手机'
          Width = 83
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Rmail'
          Title.Caption = '电子信箱'
          Width = 84
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Radr'
          Title.Caption = '家庭住址'
          Width = 98
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Rjtime'
          Title.Caption = '进入公司时间'
          Width = 76
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Rhtime'
          Title.Caption = '合同时间'
          Visible = True
        end>
    end
    object CheckBox1: TCheckBox
      Left = 48
      Top = 48
      Width = 13
      Height = 14
      Caption = 'CheckBox1'
      TabOrder = 1
    end
    object Edit2: TEdit
      Left = 600
      Top = 8
      Width = 121
      Height = 21
      TabOrder = 2
      Text = '"C:\program files\sie\Sgr.DB"'
      Visible = False
    end
    object CheckBox2: TCheckBox
      Left = 48
      Top = 96
      Width = 13
      Height = 14
      Caption = 'CheckBox1'
      TabOrder = 3
    end
    object Edit3: TEdit
      Left = 183
      Top = 91
      Width = 121
      Height = 21
      TabOrder = 4
    end
    object buname: TDBLookupComboBox
      Left = 184
      Top = 40
      Width = 121
      Height = 21
      KeyField = 'BuNa'
      ListField = 'BuNa'
      ListSource = DataSource2
      TabOrder = 5
    end
    object Button1: TButton
      Left = 352
      Top = 39
      Width = 50
      Height = 22
      Caption = '查询'
      Default = True
      TabOrder = 6
      OnClick = Button1Click
    end
    object hao: TEdit
      Left = 568
      Top = 8
      Width = 121
      Height = 21
      TabOrder = 7
      Text = '%'
      Visible = False
    end
    object Button2: TButton
      Left = 584
      Top = 272
      Width = 75
      Height = 25
      Caption = '返回上一级'
      TabOrder = 8
      OnClick = Button2Click
    end
    object Button3: TButton
      Left = 464
      Top = 272
      Width = 75
      Height = 25
      Caption = '返回主菜单'
      TabOrder = 9
      OnClick = Button3Click
    end
    object Edit1: TEdit
      Left = 183
      Top = 139
      Width = 121
      Height = 21
      TabOrder = 10
    end
    object CheckBox3: TCheckBox
      Left = 48
      Top = 144
      Width = 13
      Height = 14
      Caption = 'CheckBox1'
      TabOrder = 11
    end
    object Edit4: TEdit
      Left = 183
      Top = 187
      Width = 121
      Height = 21
      TabOrder = 12
    end
    object CheckBox4: TCheckBox
      Left = 48
      Top = 192
      Width = 13
      Height = 14
      Caption = 'CheckBox1'
      TabOrder = 13
    end
    object CheckBox5: TCheckBox
      Left = 48
      Top = 240
      Width = 13
      Height = 14
      Caption = 'CheckBox1'
      TabOrder = 14
    end
    object ynian: TComboBox
      Left = 184
      Top = 236
      Width = 41
      Height = 21
      ItemHeight = 13
      TabOrder = 15
      Text = '20'
      Items.Strings = (
        '18'
        '20'
        '25'
        '30'
        '35'
        '40'
        '45'
        '50'
        '55'
        '60'
        '65')
    end
    object tnian: TComboBox
      Left = 273
      Top = 236
      Width = 42
      Height = 21
      ItemHeight = 13
      TabOrder = 16
      Text = '30'
      Items.Strings = (
        '20'
        '25'
        '30'
        '35'
        '40'
        '45'
        '50'
        '55'
        '60'
        '65')
    end
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 704
    Top = 24
  end
  object Query1: TQuery
    SQL.Strings = (
      'SELECT *     from "C:\program files\sie\Sgr.DB"')
    Left = 704
    Top = 8
  end
  object DataSource2: TDataSource
    DataSet = Table1
    Left = 552
    Top = 16
  end
  object Table1: TTable
    DatabaseName = 'C:\program files\sie'
    TableName = 'Sbu.DB'
    Left = 552
    Top = 48
  end
  object XPMenu1: TXPMenu
    DimLevel = 30
    GrayLevel = 10
    Font.Charset = GB2312_CHARSET
    Font.Color = clMenuText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    Color = clBtnFace
    IconBackColor = clBtnFace
    MenuBarColor = clBtnFace
    SelectColor = clMaroon
    SelectBorderColor = clFuchsia
    SelectFontColor = 33023
    DisabledColor = clInactiveCaption
    SeparatorColor = clGreen
    CheckedColor = clHighlight
    IconWidth = 24
    DrawSelect = True
    UseSystemColors = False
    OverrideOwnerDraw = False
    Gradient = False
    FlatMenu = False
    AutoDetect = False
    Active = True
    Left = 520
    Top = 16
  end
end