TADODataset.DeleteRecords(arFiltered) umkehren

[marabu]

Hallo,

du kannst entweder mit dem DataSet selbst arbeiten:

Delphi-Quellcode:

var
  sFilter: String;
begin
  with DataSet do
  begin
    sFilter := Filter;
    Filtered := False;
    Filter := Format('NOT (%s)', [sFilter]);
    Filtered := True;
    DeleteRecords(arFiltered);
    Filtered := False;
  end;
end;

Oder du arbeitest mit der Methode Clone().

Grüße vom marabu