unit DynWhere_ClientData;

interface

uses
  {vcl:} SysUtils, Classes, DB, DBClient,
  {RemObjects:} uROClient, uROClientIntf, uRORemoteService, uROBinMessage, uROWinInetHTTPChannel,
  {Data Abstract:} uDADataTable, uDABin2DataStreamer, uDAInterfaces, uDARemoteDataAdapter,
  uDADataStreamer, uDAScriptingProvider, uDAMemDataTable;

type
  TDynWhere_ClientDataForm = class(TDataModule)
    Message: TROBinMessage;
    Channel: TROWinInetHTTPChannel;
    RemoteService: TRORemoteService;
    DataStreamer: TDABin2DataStreamer;
    RemoteDataAdapter: TDARemoteDataAdapter;
    tbl_Data: TDAMemDataTable;
    ds_Data: TDADataSource;
    procedure DataModuleCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DynWhere_ClientDataForm: TDynWhere_ClientDataForm;

implementation

{$R *.dfm}

procedure TDynWhere_ClientDataForm.DataModuleCreate(Sender: TObject);
begin
  RemoteDataAdapter.SetupDefaultRequest;
end;

end.