unit16.dfm

以学习为目的,使用DIPH开发而成,功能强大,是我们的老师提供的!

object Form16: TForm16
  Left = 270
  Top = 175
  Width = 720
  Height = 523
  Caption = '职员管理'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 472
    Height = 496
    Align = alClient
    AutoSize = True
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 1
      Top = 1
      Width = 470
      Height = 494
      Align = alClient
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = '宋体'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'Bh'
          Title.Alignment = taCenter
          Title.Caption = '职员编号'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Xm'
          Title.Alignment = taCenter
          Title.Caption = '姓名'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Xb'
          PickList.Strings = (
            '男'
            '女')
          Title.Alignment = taCenter
          Title.Caption = '性别'
          Width = 47
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Gz'
          Title.Alignment = taCenter
          Title.Caption = '工资'
          Width = 76
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Gzjy'
          Title.Alignment = taCenter
          Title.Caption = '工作经验'
          Width = 71
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Zw'
          Title.Alignment = taCenter
          Title.Caption = '职位'
          Width = 109
          Visible = True
        end>
    end
  end
  object Panel2: TPanel
    Left = 472
    Top = 0
    Width = 240
    Height = 496
    Align = alRight
    TabOrder = 1
    object Splitter1: TSplitter
      Left = 1
      Top = 105
      Width = 238
      Height = 3
      Cursor = crVSplit
      Align = alTop
    end
    object Panel3: TPanel
      Left = 1
      Top = 108
      Width = 238
      Height = 387
      Align = alClient
      TabOrder = 0
      object Label1: TLabel
        Left = 16
        Top = 24
        Width = 48
        Height = 12
        Caption = '职员编号'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label2: TLabel
        Left = 136
        Top = 24
        Width = 36
        Height = 12
        Caption = '性  别'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label3: TLabel
        Left = 16
        Top = 48
        Width = 36
        Height = 12
        Caption = '姓  名'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label4: TLabel
        Left = 16
        Top = 72
        Width = 36
        Height = 12
        Caption = '工  资'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label5: TLabel
        Left = 16
        Top = 96
        Width = 48
        Height = 12
        Caption = '工作经验'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 16
        Top = 120
        Width = 36
        Height = 12
        Caption = '职  位'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Button1: TButton
        Left = 10
        Top = 204
        Width = 70
        Height = 23
        Caption = '增  加'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = Button1Click
      end
      object Button2: TButton
        Left = 82
        Top = 204
        Width = 70
        Height = 23
        Caption = '删  除'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = Button2Click
      end
      object Button3: TButton
        Left = 154
        Top = 204
        Width = 70
        Height = 23
        Caption = '修  改'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = Button3Click
      end
      object Button4: TButton
        Left = 10
        Top = 228
        Width = 70
        Height = 23
        Caption = '刷  新'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = Button4Click
      end
      object Button5: TButton
        Left = 154
        Top = 228
        Width = 70
        Height = 23
        Caption = '取  消'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        OnClick = Button5Click
      end
      object DBEdit1: TDBEdit
        Left = 72
        Top = 16
        Width = 57
        Height = 20
        DataField = 'Bh'
        DataSource = DataSource1
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 5
      end
      object DBComboBox1: TDBComboBox
        Left = 176
        Top = 16
        Width = 49
        Height = 20
        DataField = 'Xb'
        DataSource = DataSource1
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ItemHeight = 12
        Items.Strings = (
          '男'
          '女')
        ParentFont = False
        TabOrder = 6
      end
      object DBEdit2: TDBEdit
        Left = 72
        Top = 40
        Width = 153
        Height = 20
        DataField = 'Xm'
        DataSource = DataSource1
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 7
      end
      object DBEdit3: TDBEdit
        Left = 72
        Top = 64
        Width = 153
        Height = 20
        DataField = 'Gz'
        DataSource = DataSource1
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 8
      end
      object DBEdit4: TDBEdit
        Left = 72
        Top = 88
        Width = 153
        Height = 20
        DataField = 'Gzjy'
        DataSource = DataSource1
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 9
      end
      object DBEdit5: TDBEdit
        Left = 72
        Top = 112
        Width = 153
        Height = 20
        DataField = 'Zw'
        DataSource = DataSource1
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 10
      end
    end
    object Panel4: TPanel
      Left = 1
      Top = 1
      Width = 238
      Height = 104
      Align = alTop
      TabOrder = 1
      object Label7: TLabel
        Left = 24
        Top = 16
        Width = 60
        Height = 12
        Caption = '请输入姓名'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Edit1: TEdit
        Left = 24
        Top = 32
        Width = 193
        Height = 20
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object Button6: TButton
        Left = 147
        Top = 58
        Width = 70
        Height = 23
        Caption = '查  找'
        Default = True
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = Button6Click
      end
    end
  end
  object Table1: TTable
    Active = True
    DatabaseName = '.\data'
    TableName = '职员表.db'
    Left = 665
    Top = 360
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 633
    Top = 360
  end
end