Componentes.Terceros.RemObj.../internal/5.0.23.613/1/RemObjects SDK for Delphi/Samples/Named Pipes/NamedPipeServer.dpr
david 2824855ea7 - Modificación del paquete RemObjects_Core_D10 para que sea un paquete de runtime/designtime (antes era designtime sólo)
- Recompilación en Delphi10 de todos los paquetes de RO para generar las DCU's en Lib\D10
- Recompilación en Delphi10 de todos los paquetes de DA para generar las DCU's en Lib\D10

git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.RemObjects@9 b6239004-a887-0f4b-9937-50029ccdca16
2007-09-10 14:06:19 +00:00

22 lines
609 B
ObjectPascal

program NamedPipeServer;
{#ROGEN:NamedPipeLibrary.rodl} // RemObjects: Careful, do not remove!
uses
uROComInit,
SvcMgr,
NamedPipeServerMain in 'NamedPipeServerMain.pas' {NamedPipeServerService: TService},
NamedPipeLibrary_Intf in 'NamedPipeLibrary_Intf.pas',
NamedPipeLibrary_Invk in 'NamedPipeLibrary_Invk.pas',
NamedPipeService_Impl in 'NamedPipeService_Impl.pas';
{$R *.RES}
{$R RODLFile.res}
begin
Application.Initialize;
Application.Title := 'Named Pipes Server';
Application.CreateForm(TNamedPipeServerService, NamedPipeServerService);
Application.Run;
end.