DBGrid nur markierte Datensätze löschen

[Stevie]

Hallo Martin

Delphi-Quellcode:

begin
  DBGrid1.DataSource.DataSet.DisableControls;
  while DBGrid1.SelectedRows.Count > 0 do
  begin
    DBGrid1.DataSource.DataSet.GotoBookmark(Pointer(DBGrid1.SelectedRows[0]));
    DBGrid1.DataSource.DataSet.Delete;
    DBGrid1.SelectedRows.Refresh;
  end;
  DBGrid1.DataSource.DataSet.EnableControls;
end;

MfG
Stevie