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

最新推荐文章于 2021-06-23 19:16:12 发布

rznice

最新推荐文章于 2021-06-23 19:16:12 发布

阅读量4.7k

点赞数

分类专栏： delphi

本文链接：https://blog.csdn.net/rznice/article/details/46638513

版权

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

摘要由CSDN通过智能技术生成

在主线程中单独调用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.csdn.net/shuaihj/article/details/17526773