فهرست منبع

* Fix bug #36086 (Lookup causes AV if dataset is empty)

git-svn-id: trunk@43034 -
michael 5 سال پیش
والد
کامیت
18479fa113
1فایلهای تغییر یافته به همراه2 افزوده شده و 0 حذف شده
  1. 2 0
      packages/fcl-db/src/base/bufdataset.pas

+ 2 - 0
packages/fcl-db/src/base/bufdataset.pas

@@ -3848,6 +3848,8 @@ var
   bm:TBookmark;
 begin
   result:=Null;
+  if IsEmpty then
+    exit;
   bm:=GetBookmark;
   DisableControls;
   try