how to check is an event running at different thread?

[actalk]

Hello,

To determine is current event is runnung in main thread:

In form's constructor I set a variable

Code: Select all

testCheck := GetCurrentThreadId;

in the event :

Code: Select all

if testCheck = GetCurrentThreadId then
//running in main thread
else
//running in another thread

I wonder if this is right way?

Thanks

[Kambiz]

It's correct.

You do not need to initialize your own testCheck variable, Delphi already declared and initiated MainThreadID variable for this purpose.

Code: Select all

if MainThreadID = GetCurrentThreadId then
  // in main thread
else
  // in child thread