partsrv.dpr

来自「Delphi 下COM开发的重要参考书籍之一。使用有一定COM开发经验的使用者」· DPR 代码 · 共 22 行

program PartSrv;

uses
  Forms,
  MainForm in 'MainForm.pas' {Form1},
  PartSrv_TLB in 'PartSrv_TLB.pas',
  PartServerImpl in 'PartServerImpl.pas' {PartServer: CoClass},
  Parts in 'Parts.pas',
  DataModule in 'DataModule.pas' {PartDM: TDataModule};

{$R *.TLB}

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TPartDM, PartDM);
  Application.Run;
end.