Browse Source

fcl-db: sqlconnection:
* actually follow default property for Property LogEvents..Default LogAllEvents in constructor
* addresses issue #25867

git-svn-id: trunk@27170 -

reiniero 11 years ago
parent
commit
420e0165a2
1 changed files with 1 additions and 0 deletions
  1. 1 0
      packages/fcl-db/src/sqldb/sqldb.pp

+ 1 - 0
packages/fcl-db/src/sqldb/sqldb.pp

@@ -1191,6 +1191,7 @@ begin
   inherited Create(AOwner);
   inherited Create(AOwner);
   FSQLFormatSettings:=DefaultSQLFormatSettings;
   FSQLFormatSettings:=DefaultSQLFormatSettings;
   FFieldNameQuoteChars:=DoubleQuotes;
   FFieldNameQuoteChars:=DoubleQuotes;
+  FLogEvents:=LogAllEvents; //match Property LogEvents...Default LogAllEvents
   FStatements:=TFPList.Create;
   FStatements:=TFPList.Create;
 end;
 end;