unit FetchClientData; interface uses {vcl:} SysUtils, Classes, DB, DBClient, {RemObjects:} uROClient, uROClientIntf, uRORemoteService, uROBinMessage, uROWinInetHTTPChannel, {Data Abstract:} uDABin2DataStreamer, uDADataStreamer; type TFetchClientDataModule = class(TDataModule) Message: TROBinMessage; Channel: TROWinInetHTTPChannel; RemoteService: TRORemoteService; DataStreamer: TDABin2DataStreamer; private { Private declarations } public { Public declarations } end; var FetchClientDataModule: TFetchClientDataModule; implementation uses FetchClientMain; {$R *.dfm} end.