program $PRJNAME; {#ROGEN:$LIBRARYNAME.RODL} // RemObjects SDK: Careful, do not remove! uses uROComInit, uROComboService, Forms, fServerForm in 'fServerForm.pas' {ServerForm}, $SERVICENAME_Impl in '$SERVICENAME_Impl.pas' {$SERVICENAME: TDARemoteService}, fServerDataModule in 'fServerDataModule.pas' {ServerDataModule: TDataModule}; {$R *.res} {$R RODLFile.res} begin if ROStartService('$PRJNAME', '$PRJNAME') then begin ROService.CreateForm(TServerDataModule, ServerDataModule); ROService.Run; Exit; end; Application.Initialize; Application.CreateForm(TServerDataModule, ServerDataModule); Application.CreateForm(TServerForm, ServerForm); Application.Run; end.