unit721.pas

Delphi6分布式开发例程12 )

unit Unit721;

interface

uses
  SysUtils, Classes, HTTPApp, DB, DBClient, MConnect, HTTPProd, CompProd,
  PagItems, MidProd, XMLBrokr, MidItems, WebComp;

type
  TWebModule1 = class(TWebModule)
    XMLBroker1: TXMLBroker;
    InetXPageProducer1: TInetXPageProducer;
    DCOMConnection1: TDCOMConnection;
    DataForm1: TDataForm;
    FieldGroup1: TFieldGroup;
    DataNavigator1: TDataNavigator;
    EMP_NO: TFieldText;
    FIRST_NAME: TFieldText;
    LAST_NAME: TFieldText;
    PHONE_EXT: TFieldText;
    HIRE_DATE: TFieldText;
    DEPT_NO: TFieldText;
    JOB_CODE: TFieldText;
    JOB_GRADE: TFieldText;
    JOB_COUNTRY: TFieldText;
    SALARY: TFieldText;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  WebModule1: TWebModule1;

implementation

{$R *.DFM}

end.