anchor.diff:    TmVirtualDatasetFilterManager = class;
     TmVirtualDatasetSummaryManager = class;
   
  +  TmOnFilterVirtualDataset = procedure (Sender : TObject) of object;
  +
     { TmCustomVirtualDataset }
   
     TmCustomVirtualDataset = class(TDataSet)
  
positive.code:     function Sort : boolean;
      procedure ClearSort;
    end;
  
    { TmVirtualDatasetFilterManager }
  
  
negative.code:     property AutomaticInitFieldsFormat : boolean read FAutomaticInitFieldsFormat write FAutomaticInitFieldsFormat;
  
      property DatasetDataProvider : TmVirtualDatasetDataProvider read FVirtualDatasetProvider write FVirtualDatasetProvider;
      property OnFilter : TmOnFilterVirtualDataset read FOnFilter write FOnFilter;
    end;
  
    TmVirtualDataset = class(TmCustomVirtualDataset)
  