Bookmark Check

[Tim Henford]

Hallo,

ich habe folgendes Problem:
Mein Programm hat ein DBGrid, das mit einem AdoQuery (MainQu) verbunden ist, in dem ein User arbeitet.
Nach einer gewissen Zeit, soll das MainQu schauen, ob sich in der DB was geändert hat. Das mache ich mit MainQu.Close; und MainQu.Open; (der MainQu.SQl.Text="select * from Tabelle")

Ändert sich nun tatsächlich was, und gerade der Eintrag wurde gelöscht, den der User selektiert hat, funktioniert folgende Funktion nicht mehr. Da wird sicher versucht auf ein nicht mehr vorhanden Eintrag mit GotoBookmark zu springen. MainQu.BookmarkValid scheint da auch nichts zu bringen...

Wie kann ich das umgehen?

Delphi-Quellcode:

var
  SavePlace: TBookmark;
begin
  SavePlace:= MainQu.GetBookmark;
  MainQu.Close; MainQu.Open; 
  if MainQu.BookmarkValid(SavePlace) then MainQu.GotoBookmark(SavePlace);
  FreeBookmark(SavePlace);
end;

Danke