Delphi中出现小问题及处理

1、尚未调用CoInitialize

这是在调用Com对象（比如ADO对象）时出现的错误，按道理Delphi应该把这个问题自动处理好，但它就是出现了。所以只能自己处理。在单元文件中引用ActiveX，然后在初始和结束手动初始化和结束初始化。

initialization

CoInitialize(nil);

finalization

CoUninitialize;

另外有一点需要注意的是，根据MSDN：

Initializes the COM library on the current thread and identifies the concurrency model as single-thread apartment (STA).

New applications should call CoInitializeEx instead of CoInitialize.

If you want to use the Windows Runtime, you must call Windows::Foundation::Initialize instead.

这个Com库的初始化函数只对当前线程有效，所以如果使用了多线程，在别的线程出现报错，只是手动在主线程增加初始化是没用的，必须加在对应的线程单元中合适的位置。

以上述程序为例，开始的时候，将 CoInitialize(nil)加在了主窗体中，无效，因为对相关Com的调用是在别的线程；然后加在线程文件的initialization中，出乎意料，也无效。后来思考了一下，单元文件的initialization实际上还是主线程调用的，因为这时我自己写的线程还没有启动。最后把调用加在Execute方法里，报错消失了。

2、被呼叫方拒绝接收呼叫

因为是通过Com对象进行操作（比如导出Excel），这种情况一般是由于操作过快造成的（Com的速度都比较慢），需要减缓一下操作速度。

• 点赞
• 收藏
• 分享
• 文章举报