groupadd.~dfm

专家抽取系统1.0 是用Delphi6.0 开发的一款用于招投标,评审过程中从专家库中抽取专家的软件。可以将抽取结果导入到Excel或Word文档中

object frmGroupAdd: TfrmGroupAdd
  Left = 340
  Top = 252
  Width = 378
  Height = 249
  Caption = #22686#21152#32452
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 56
    Top = 44
    Width = 35
    Height = 13
    Caption = #32452'    ID'
  end
  object Label2: TLabel
    Left = 56
    Top = 100
    Width = 36
    Height = 13
    Caption = #32452'    '#21517
  end
  object DBEdit1: TDBEdit
    Left = 112
    Top = 40
    Width = 89
    Height = 21
    DataField = #32452'ID'
    DataSource = DataSource1
    Enabled = False
    TabOrder = 0
  end
  object DBEdit2: TDBEdit
    Left = 112
    Top = 96
    Width = 201
    Height = 21
    DataField = #32452#21517
    DataSource = DataSource1
    TabOrder = 1
  end
  object btnSave: TButton
    Left = 144
    Top = 173
    Width = 75
    Height = 25
    Caption = #20445'  '#23384'(&S)'
    TabOrder = 2
    OnClick = btnSaveClick
  end
  object btnCancel: TButton
    Left = 240
    Top = 173
    Width = 75
    Height = 25
    Caption = #21462'  '#28040'(&C)'
    TabOrder = 3
    OnClick = btnCancelClick
  end
  object btnAdd: TButton
    Left = 48
    Top = 173
    Width = 75
    Height = 25
    Caption = #22686'  '#21152'(&A)'
    Enabled = False
    TabOrder = 4
    Visible = False
    OnClick = btnAddClick
  end
  object DataSource1: TDataSource
    DataSet = ADOQryGroup
    Left = 24
    Top = 184
  end
  object ADOQryGroup: TADOQuery
    Connection = frmMain.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from ExpertGroup')
    Top = 184
  end
  object ADOQryMaxID: TADOQuery
    Parameters = <>
  end
end