fcl-db: sqldb: ExecuteDirect should call StartImplicitTransaction, when Transaction.Options contains stoUseImplicit (else it leads later to AV due to nil Transaction.Handle)

git-svn-id: trunk@30920 -

packages/fcl-db/src/sqldb/sqldb.pp

@@ -1224,7 +1224,7 @@ begin
     DatabaseError(SErrTransactionnSet);
 
   if not Connected then Open;
-  if not (ATransaction.Active or (stoUseImplicit in ATransaction.Options)) then
+  if not ATransaction.Active then
     ATransaction.MaybeStartTransaction;
 
   try