如何从Delphi中的主线程向TThread发送消息？

I want to send a message to a thread and handle it in the thread. How can I do this in Delphi? I guess I want to send a message to a thread and handle