TDataSetProperties = class
 private
    FDBName: String;
    FProviderName: String;
    FParams: TParams;
 Public
    Property DBName:String read FDBName write FDBName;
    Property ProviderName: string read FProviderName write FProviderName;
    Property Params: TParams read FParams write FParams;
    Constructor Create;
    Destructor Destroy; Override;
end;


IDataSet = Interface
 ['{A05A188A-F45D-43D0-A410-D8EF6631DBBC}']
  Function Identity : Integer;
  Procedure ApplyUpdates(MaxErrors:Integer);
  Procedure SetParameter(ParamName:String; Value:OLEVariant);
  Procedure OpenOrExecute;
  Procedure OpenOrExecuteAsync(OnTerminate:TDataSetNotifyEvent);
  Procedure CancelAsyncExecution(OnTerminate:TDataSetNotifyEvent);

  Property ProviderName: string read GetProviderName write SetProviderName;
  Property Properties : TDataSetProperties read GetDataSetProperties;
end;