Остановка потоков по ID

[steelforce]

Подскажите, пожалуйста - как остановить поток в delphi по его ID, полученному через GetCurrentThreadId ?

[psycho-coder]

PostMessage(ThreadId, WM_CLOSE, 0, 0)

[mihali4]

Смотрим в хэлп и изумляемся :

The TerminateThread function terminates a thread.

BOOL TerminateThread(
HANDLE hThread, // handle to the thread
DWORD dwExitCode // exit code for the thread
);