pcohelloworld.dpr

来自「就是这本书的随书代码。包括《实战Delphi 5.x-分布式多层应用系统篇》」· DPR 代码 · 共 15 行

program PcoHelloWorld;
{$APPTYPE CONSOLE}
uses
  SysUtils,
  CorbaObj,
  ucoHelloWorld in 'ucoHelloWorld.pas' {coHelloWorld: CoClass},
  PcoHelloWorld_TLB in 'PcoHelloWorld_TLB.pas';
  
{$R *.TLB} {CORBA}

begin
  // Insert user code here
  CORBAInitialize;
  try
    WriteLn('CORBA Hello World