personneltype_unit.dfm

货源代理管理系统 同样是DELPHI7下的

inherited frmPersonnelType: TfrmPersonnelType
  Left = 330
  Top = 214
  Caption = #20154#21592#20998#31867
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 12
  inherited Panel1: TPanel
    inherited DBGrid1: TDBGrid
      DataSource = DM.dsrPersonnelType
      Columns = <
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'PersonnelType'
          Title.Alignment = taCenter
          Title.Caption = #31867#22411
          Width = 80
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'PersonnelDescn'
          Title.Alignment = taCenter
          Title.Caption = #21517#31216
          Width = 80
          Visible = True
        end>
    end
  end
  inherited Panel2: TPanel
    inherited Label1: TLabel
      Caption = #31867#22411#65306
    end
    inherited DBText1: TDBText
      DataField = 'PersonnelType'
      DataSource = DM.dsrPersonnelType
    end
    inherited btnAdd: TBitBtn
      OnClick = btnAddClick
    end
    inherited btnModfiy: TBitBtn
      OnClick = btnModfiyClick
    end
    inherited btnDel: TBitBtn
      OnClick = btnDelClick
    end
    inherited btnSave: TBitBtn
      OnClick = btnSaveClick
    end
    inherited DBEdit2: TDBEdit
      DataField = 'PersonnelDescn'
      DataSource = DM.dsrPersonnelType
    end
  end
end