请教XMLHTTP多线程的有关问题

请问XMLHTTP多线程的问题。
用API创建普通线程没有任何问题。
hthread:=createthread(nil,0,@tt,nil,0,threadid); 

tt过程为一个简单的加法计算。
正常运行，程序不崩溃

但是
调用一个更新的过程，一触发就崩溃

更新的过程就是
xmlHttp:=CreateOleObject('MSXML2.XMLHTTP');
[解决办法]
uses ActiveX;

Coinitialized(nil);

cardateoleobject('...');