srv.dpr

三层系统设计中,应用服务层和客户端使用结构体传送数据进行通信.

program Srv;

uses
  Forms,
  SrvMainUnit in 'SrvMainUnit.pas' {Form1},
  Srv_TLB in 'Srv_TLB.pas',
  RDMUnit in 'RDMUnit.pas' {xxx: TRemoteDataModule} {xxx: CoClass},
  Comm in 'Comm.pas';

{$R *.TLB}

{$R *.res}

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