delphi 调用webservice产生 Microsoft MSXML is not installed的解决办法。

最新推荐文章于 2022-09-20 16:18:27 发布

原创最新推荐文章于 2022-09-20 16:18:27 发布 · 5k 阅读

1 ·

CC 4.0 BY-SA版权

delphi 专栏收录该内容

64 篇文章

订阅专栏

在Delphi中，主线程调用WebService无误，但移到非主线程时出现'Microsoft MSXML is not installed'警告。原因是MSXML组件与COM有关，非主线程使用需手动调用CoInitializeEx初始化。解决方案是在线程开始时调用CoInitializeEx，结束时调用CoUninitialize，确保COM线程安全。

在主线程中单独调用webservice 是没有问题的，系统运行正常，但是当把这个调用放到非主线的时候就会出现 Microsoft MSXML is not installed 这样的提示。这个调用和msxml有什么关系呢？整个过程没有对xml格式的进行解析，于是在网络上查找了一番，发现这个和 com有关系。

这是因为MSXML是个COM组件，一般情况下，COM组件运行在主线程中，不用考虑串行化问题。如果要在多线程中使用，要考虑串行化问题，需要显示的调用CoInitializeEx来完成对COM的初始化工作。

解决办法就是在线程的起始位置加上：

  //使用多线程需要注意，如果是需要共用某些可能会操作到如MSXML等涉及到COM对象的话，在线程当中需要调用
  CoInitializeEx(Nil, COINIT_MULTITHREADED);

在线程结束的时候调用

CoUninitialize。

对于每个使用com库的线程，CoInitializeEx 至少必须调用一次, 通常也只调用一次。只要传递相同的并发标志参数，同一个线程多次调用CoInitializeEx也是允许的，但是后面的有效调用返回S_FLASE。要在一个线程上合理关闭com库，每一次成功调用CoInitializeEx，都必须对应调用一次CoUninitialize。

参考：http://blog.youkuaiyun.com/shuaihj/article/details/17526773