Delphi 线程卡住

Question

我编写了一个有两个线程的服务应用程序。
第一个线程，显示带有标签的表单。
第二个线程，查询 ADO。

第一个线程总是用沙漏光标卡住，没有标签标题。

请帮忙。

Answer 1

如果您尝试从不是主线程的线程中显示表单，那么您将遇到类似这样的奇怪事情。其中最值得注意的是，如果表单和标签是在非主线程中创建的，那么您就没有消息循环来处理消息。如果表单是在主线程中创建的，但您试图从非主线程中显示它，那么由于 Windows 处理消息和线程的方式，它很可能是死锁。

创建窗口句柄时，它与创建它的线程相关联。这意味着 Windows 将确保发送到该句柄的任何消息都在该线程上处理。

我强烈建议您阅读窗口消息、消息队列和句柄如何在多线程环境中交互和运行。如果没有正确完成，您肯定会遇到一些非常奇怪且可能无法预测的行为。