git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.RemObjects@2 b6239004-a887-0f4b-9937-50029ccdca16
25 lines
760 B
ObjectPascal
25 lines
760 B
ObjectPascal
program FetchServer;
|
|
|
|
{#ROGEN:FetchLibrary.RODL} // RemObjects SDK: Careful, do not remove!
|
|
|
|
uses
|
|
uROComInit,
|
|
uROComboService,
|
|
Forms,
|
|
FetchServerMain in 'FetchServerMain.pas' {FetchServerMainForm},
|
|
FetchServerData in 'FetchServerData.pas' {FetchServerDataModule: TDataModule},
|
|
FetchLibrary_Intf in 'FetchLibrary_Intf.pas',
|
|
FetchLibrary_Invk in 'FetchLibrary_Invk.pas',
|
|
FetchService_Impl in 'FetchService_Impl.pas' {FetchService: TDataAbstractService};
|
|
|
|
{$R *.res}
|
|
{$R RODLFile.res}
|
|
|
|
begin
|
|
Application.Initialize;
|
|
Application.Title := 'Fetch Server';
|
|
Application.CreateForm(TFetchServerDataModule, FetchServerDataModule);
|
|
Application.CreateForm(TFetchServerMainForm, FetchServerMainForm);
|
|
Application.Run;
|
|
end.
|