firstcorbaserver.dpr

来自「《Delphi开发人员指南》配书原码」· DPR 代码 · 共 18 行

program FirstCorbaServer;

uses
  Forms,
  ufrmFirstCorbaServer in 'ufrmFirstCorbaServer.pas' {Form1},
  FirstCorbaServer_TLB in 'FirstCorbaServer_TLB.pas',
  uMyFirstCorbaServer in 'uMyFirstCorbaServer.pas' {MyFirstCorbaServer: CoClass};

{$R *.TLB} {CORBA}

{$R *.RES}

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