TMySQLConnection.GetThreadId requires the connection to be active. Fixes issue #2561.

This commit is contained in:
Ansgar Becker
2011-09-20 17:23:36 +00:00
parent 4e0d7fdcdb
commit 65de4c482e

View File

@ -1114,8 +1114,8 @@ begin
ClosePlink;
raise EDatabaseError.Create(Error);
end else begin
Log(lcInfo, 'Connected. Thread-ID: '+IntToStr(ThreadId));
FActive := True;
Log(lcInfo, 'Connected. Thread-ID: '+IntToStr(ThreadId));
CharacterSet := 'utf8';
CurCharset := CharacterSet;
Log(lcDebug, 'Characterset: '+CurCharset);