Danke ich hab jetzt aber schon eine Lösung:
Delphi-Quellcode:
b := TBookmarkList.Create(dbgrid);
dbgrid.DataSource.DataSet.First;
for i := 0 to dbgrid.DataSource.DataSet.RecordCount -1 do begin
dbgrid.SelectedRows.CurrentRowSelected:=True;
dbgrid.DataSource.DataSet.Next;
end;
b := dbgrid.SelectedRows;
mfg
Maa