瀏覽代碼

* CanModify shoud not be dependent on active

git-svn-id: trunk@5663 -
joost 18 年之前
父節點
當前提交
642e611f88
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      fcl/db/sqldb/sqldb.pp

+ 1 - 1
fcl/db/sqldb/sqldb.pp

@@ -1273,7 +1273,7 @@ Function TSQLQuery.GetCanModify: Boolean;
 begin
   // the test for assigned(FCursor) is needed for the case that the dataset isn't opened
   if assigned(FCursor) and (FCursor.FStatementType = stSelect) then
-    Result:= Active and  FUpdateable and (not FReadOnly)
+    Result:= FUpdateable and (not FReadOnly)
   else
     Result := False;
 end;