Programalama > DELPHI

Eğer grid’in MultiSelect özelliği True yapılmışsa ve grid’den rastgele iki veya daha fazla kayıt seçilmişse seçilen kayıtlara aşağıdaki koda benze bir kod yardımıyla ulaşabilirsiniz.

procedure TForm1.BitBtn1Click(Sender: TObject);
var
  Liste: TBookMarkList;
  i: integer;
  Kayit: TBookMark;
begin
  Liste:=DBGrid1.SelectedRows;
  for i:=0 to Liste.Count-1 do begin
    Kayit:=TBookMark(Liste.Items[i]);
    Table1.GotoBookmark(Kayit);
end;
end;