procedure TMyThread.Execute;
var ITest: ITestMtsObj; // TestMtsObj是MTS Object;
begin
CoInitliazeEx(.....)//为本线程初始化COM环境
ITest := CoTestMtsObj.Create; //报错:"消息筛选器显示应用程序正在使
用";
....
.....
CoUninitialize; //
end;这样试试.
var ITest: ITestMtsObj; // TestMtsObj是MTS Object;
begin
CoInitliazeEx(.....)//为本线程初始化COM环境
ITest := CoTestMtsObj.Create; //报错:"消息筛选器显示应用程序正在使
用";
....
.....
CoUninitialize; //
end;这样试试.
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货