* Patch for bug #27067 by Tony Whyman

git-svn-id: trunk@29112 -
2025-08-29 16:40:25 +02:00 · 2014-11-22 19:17:10 +00:00 · 2014-11-22 19:17:10 +00:00 · 42a317ab73
commit 42a317ab73
parent cfa859d285
1 changed files with 1 additions and 1 deletions
--- a/packages/fcl-db/src/base/datasource.inc
+++ b/packages/fcl-db/src/base/datasource.inc
@ -36,7 +36,7 @@ Var
  B : Boolean;

 begin
-  B:=Assigned(DataSource) and (DataSource.State<>dsInactive);
+  B:=Assigned(DataSource) and Not (DataSource.State in [dsInactive,dsOpening]);
  If B<>FActive then
    begin
    FActive:=B;