* GotoBookmark checks that bookmark is valid.

packages/fcl-db/db.pas

@@ -4372,7 +4372,7 @@ procedure TDataSet.GotoBookmark(const ABookmark: TBookmark);
 
 
 begin
-  If Assigned(ABookMark) then
+  If Not IsNull(ABookMark.Data) then
     begin
     CheckBrowseMode;
     DoBeforeScroll;