We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 0257867 commit 222a386Copy full SHA for 222a386
source/apphelpers.pas
@@ -3296,13 +3296,14 @@ procedure TQueryThread.LogFromThread(Msg: String; Category: TDBLogCategory);
3296
begin
3297
FLogMsg := Msg;
3298
FLogCategory := Category;
3299
- Queue(Log);
+ Synchronize(Log);
3300
end;
3301
3302
3303
procedure TQueryThread.Log;
3304
3305
- FConnection.OnLog(FLogMsg, FLogCategory, FConnection);
+ if Assigned(FConnection.OnLog) then
3306
+ FConnection.OnLog(FLogMsg, FLogCategory, FConnection);
3307
3308
3309
0 commit comments