Hallo Leute,
jetzt beantworte ich schon meine eigenen Fragen (für den Fall, daß mal jemand auch so ein Problem hat):
Delphi-Quellcode:
procedure TFKasse.AllesMarkieren1Click(Sender: TObject);
var
tmpBookmark: TBookMark;
i : integer;
begin
tmpBookmark := TBookmarkList.Create(dbgArt1);
dbgArt1.DataSource.DataSet.First;
for i := 0 to dbgArt1.DataSource.DataSet.RecordCount -1 do begin
dbgArt1.SelectedRows.CurrentRowSelected:=True;
dbgArt1.DataSource.DataSet.Next;
end;
tmpBookmark := dbgArt1.SelectedRows;
end;
mfg
eddy
[edit=Daniel B]Delphi-Tags korrigiert. Mfg, Daniel B[/edit]