连接时无法创建等待对话框

Question

从两天开始，我尝试创建简单的等待对话框，将在TADOConnection连接时显示。我的问题是我需要在等待对话框中设置动画TImage（gif图片）。但是MainForm.ADOConnection连接一切freazes（gif也）。有人知道在连接之前在分离的线程中创建对话的示例方式，并在连接完成后释放它吗？

Answer 1

如果你的数据库代码要阻塞它运行的线程，那么你就不应该在GUI线程上运行它了。如果你这样做，你将阻止GUI线程。

因此，逻辑结论是需要在不同线程上运行的数据库代码。