program Server;

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

uses
  uROComInit,
  Forms,
  fServerForm in 'fServerForm.pas' {ServerForm},
  BonjourDiscoverableService_Impl in 'BonjourDiscoverableService_Impl.pas',
  BonjourDiscoverableLibrary_Invk in 'BonjourDiscoverableLibrary_Invk.pas',
  BonjourDiscoverableLibrary_Intf in 'BonjourDiscoverableLibrary_Intf.pas';

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

begin
  Application.Initialize;
  Application.Title := 'Bonjour Discovery Server';
  Application.CreateForm(TServerForm, ServerForm);
  Application.Run;
end.