delphi出现‘尚未调用CoInitialize’异常

1. 由于使用ado等引起的异常。

2. 若是子线程或某方法操作ado可在该方法开头和结尾分别加上：

function myfun begin CoInitialize(nil); // your code; CoUninitialize; end;

3. 在主方法加入该句子有时候不能解决问题，因为默认是初始化主线程的，只有在子线程或方法加入才行。