MdModule.pas
上传用户:fh681027
上传日期:2022-07-23
资源大小:1959k
文件大小:2k
源码类别:

Delphi控件源码

开发平台:

Delphi

  1. unit MdModule;
  2. interface
  3. uses
  4.   Windows, Messages, SysUtils, Classes, HTTPApp, MidItems, Db, DBClient,
  5.   MConnect, CompProd, PagItems, MidProd, XMLBrokr, WebComp, HTTPProd;
  6. type
  7.   TWebModule1 = class(TWebModule)
  8.     XMLBroker1: TXMLBroker;
  9.     InetXPageProducer1: TInetXPageProducer;
  10.     DCOMConnection1: TDCOMConnection;
  11.     DataForm1: TDataForm;
  12.     LayoutGroup1: TLayoutGroup;
  13.     DataGrid1: TDataGrid;
  14.     TextColumn8: TTextColumn;
  15.     TextColumn9: TTextColumn;
  16.     TextColumn10: TTextColumn;
  17.     TextColumn11: TTextColumn;
  18.     TextColumn12: TTextColumn;
  19.     TextColumn13: TTextColumn;
  20.     TextColumn14: TTextColumn;
  21.     DataNavigator2: TDataNavigator;
  22.     FirstButton2: TFirstButton;
  23.     PriorPageButton1: TPriorPageButton;
  24.     PriorButton2: TPriorButton;
  25.     NextButton2: TNextButton;
  26.     NextPageButton1: TNextPageButton;
  27.     LastButton2: TLastButton;
  28.     FieldGroup1: TFieldGroup;
  29.     FieldText11: TFieldText;
  30.     FieldText12: TFieldText;
  31.     FieldText13: TFieldText;
  32.     FieldText14: TFieldText;
  33.     FieldText15: TFieldText;
  34.     FieldStatus1: TFieldStatus;
  35.     FieldText16: TFieldText;
  36.     FieldText17: TFieldText;
  37.     FieldText18: TFieldText;
  38.     FieldText19: TFieldText;
  39.     FieldText20: TFieldText;
  40.     DataNavigator1: TDataNavigator;
  41.     FirstButton1: TFirstButton;
  42.     PriorButton1: TPriorButton;
  43.     NextButton1: TNextButton;
  44.     LastButton1: TLastButton;
  45.     UndoButton1: TUndoButton;
  46.     ApplyUpdatesButton1: TApplyUpdatesButton;
  47.   private
  48.     { Private declarations }
  49.   public
  50.     { Public declarations }
  51.   end;
  52. var
  53.   WebModule1: TWebModule1;
  54. implementation
  55. {$R *.DFM}
  56. end.