设计新构想:可不可以在自己的线程中拥有一个VCL的Form,而它的消息处理机制是在自己的线程中完成,而不是主线程?

Question

就像在原始的C++ windows编程那样.
CreateThread(nil,0,childmain,aaa,0,aaa);
而childmain()是一个类似WinMain()的函数,,注册窗口,创建 窗口,然后不循环处理消息.
而在Delphi中,,却变成了"Application.CreateForm;Application.Run",
可不可创建一个自己的线程,然后在线程中"Application.CreateForm;Application.Run",在线程中处理自己的消息.
不知大家明不明白我的意思.
有没有高手尝试过?

Answer 1

vcl不是线程安全的（不知道7变没变），当然你可以在自己线程中创建一个窗口，维护它的消息队列（其实是线程的消息队列）。完全用pascal+API，不要涉及vcl，另外......等等，你说不循环处理消息是什么意思？
很少有人这么做吧？

Answer 2

呵呵……线程中有窗体，完全可以的。自己处理消息也行，重载窗体的windowproc就行了。