多线程+Webservice分布式编程时需要注意的COM问题

多线程+Webservice分布式编程时需要注意的COM问题

老帅 在分布式开发中，经常会使用Webservice技术，为其他应用提供服务。我们的应用在使用Delphi（这里用的是DelphiXE3,其他开发语言同理）开发时，如果需要调用Webservice接口，IDE已经提供了非常方便的方法。但有的时候，在调用Webservice的时候，我们不希望等待返回结果，要去执行其他操作。这个时候我们可以使用线程来调用Webservice，在开发过程中，发现，本来在主线程中能正常调用的Webservice接口，这个时候不能调用了，抛出了“Microsoft MSXML is not installed”异常。 这是因为MSXML是个COM组件，一般情况下，COM组件运行在主线程中，不用考虑串行化问题。如果要在多线程中使用，要考虑串行化问题，需要显示的调用CoInitializeEx来完成对COM的初始化工作。

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

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