Componentes.Terceros.RemObj.../internal/5.0.24.615/1/RemObjects SDK for Delphi/Samples/Super TCP Channel Chat/SuperTCPChannelChat_Server.dpr

23 lines
849 B
ObjectPascal

program SuperTCPChannelChat_Server;
{#ROGEN:SuperTCPChannelChatLibrary.rodl} // RemObjects: Careful, do not remove!
uses
uROComInit,
Forms,
SuperTCPChannelChat_ServerMain in 'SuperTCPChannelChat_ServerMain.pas' {SuperTCPChannelChat_ServerMainForm},
LoginService_Impl in 'LoginService_Impl.pas' {LoginService: TDARemoteService},
ChatServerService_Impl in 'ChatServerService_Impl.pas' {ChatServerService: TDARemoteService},
SuperTCPChannelChatLibrary_Intf in 'SuperTCPChannelChatLibrary_Intf.pas',
SuperTCPChannelChatLibrary_Invk in 'SuperTCPChannelChatLibrary_Invk.pas';
{$R *.res}
{$R RODLFile.res}
begin
Application.Initialize;
Application.Title := 'SuperTCPChannelChat - Server';
Application.CreateForm(TSuperTCPChannelChat_ServerMainForm, SuperTCPChannelChat_ServerMainForm);
Application.Run;
end.