多线程处理

Question

在子线程中有一写数据库的“WriteDB()”的函数。
在主线程中中断子线程，系统提示“不能在异步下操作”。把函数改成“Synchronize(WriteDB);”一切正常，但是在屏幕上的鼠标响应速度变慢。
Synchronize(WriteDB);　数据量过大时，这个方法影响主界面的鼠标响应速度。WriteDB();  程序退出时出现错误提示。这是什么原因？？？

Answer 1

在“WriteDB 的最开始，加一句：
CoInitialize(nil);最后，加一句：
CoUninitialize;

Answer 2

你的WriteDB 是不是用了ADO~~~~如果是就要 aiirii所说的了, 也可以每个线程里建立独立的ADO连接进行操作, 好象那样不用 coInitialize