program FileBroadcastServer;

{#ROGEN:FileBroadcastLibrary.rodl} // RemObjects: Careful, do not remove!

uses
  uROComInit,
  uROComboService,
  Forms,
  FileBroadcastServerData in 'FileBroadcastServerData.pas' {FileBroadcastServerDataForm: TDataModule},
  FileBroadcastServerMain in 'FileBroadcastServerMain.pas' {FileBroadcastServerMainForm},
  FileBroadcastLibrary_Intf in 'FileBroadcastLibrary_Intf.pas',
  FileBroadcastLibrary_Invk in 'FileBroadcastLibrary_Invk.pas',
  FileBroadcastService_Impl in 'FileBroadcastService_Impl.pas' {FileBroadcastService: TRORemoteDataModule};

{$R *.res}
{$R RODLFile.res}

begin
  if ROStartService('FileBroadcast', 'FileBroadcast') then begin
    ROService.CreateForm(TFileBroadcastServerDataForm, FileBroadcastServerDataForm);
    ROService.Run;
    Exit;
  end;

  Application.Initialize;
  Application.Title := 'File Broadcast Server';
  Application.CreateForm(TFileBroadcastServerDataForm, FileBroadcastServerDataForm);
  Application.CreateForm(TFileBroadcastServerMainForm, FileBroadcastServerMainForm);
  Application.Run;
end.