[Delphi-码农]Delphi 多线程 “尚未调用CoInitialize错误”的解决方法
2015-01-28 14:26
387 查看
/article/4699494.html
在Delphi 多线程中出现“尚未调用CoInitialize错误”的解决方法
解决方法如下:
function TMyThread.ExecTimer: Boolean;
begin
Result := False ;
FMyThreadExecfinish := False;
Screen.Cursor := crHourGlass;
CoInitialize(nil); // 一定要加上此行代码
try
TranspondClientBaseData_factory1(HTTPRIOLeExp, HTTPRIONC, LogStrings);
Sleep(1000);
TranspondPersonBaseData_factory1(HTTPRIOLeExp, HTTPRIONC, LogStrings);
Sleep(1000);
TranspondDeptBaseData_factory1(HTTPRIOLeExp, HTTPRIONC, LogStrings);
finally
Result := True;
FMyThreadExecfinish := True;
Screen.Cursor := crDefault;
CoUninitialize;// 一定要加上此行代码
end;
end;
在Delphi 多线程中出现“尚未调用CoInitialize错误”的解决方法
解决方法如下:
function TMyThread.ExecTimer: Boolean;
begin
Result := False ;
FMyThreadExecfinish := False;
Screen.Cursor := crHourGlass;
CoInitialize(nil); // 一定要加上此行代码
try
TranspondClientBaseData_factory1(HTTPRIOLeExp, HTTPRIONC, LogStrings);
Sleep(1000);
TranspondPersonBaseData_factory1(HTTPRIOLeExp, HTTPRIONC, LogStrings);
Sleep(1000);
TranspondDeptBaseData_factory1(HTTPRIOLeExp, HTTPRIONC, LogStrings);
finally
Result := True;
FMyThreadExecfinish := True;
Screen.Cursor := crDefault;
CoUninitialize;// 一定要加上此行代码
end;
end;
相关文章推荐
- Delphi 多线程 “尚未调用CoInitialize错误”的解决方法
- Delphi中提示“尚未调用CoInitialize错误”的解决方法
- 问题-Delphi在多线程中使用其他窗体上的控件,报“尚未调用CoInitialize”解决方法
- Delphi“尚未调用CoInitialize”解决方法
- Delphi“尚未调用CoInitialize”解决方法
- Delphi“尚未调用CoInitialize”解决方法
- Delphi“尚未调用CoInitialize”解决方法
- Delphi exe动态调用加载bpl 报地址错误的解决方法
- delphi调用webServices在win2003出错误的解决方法
- [Delphi-码农]尚未调用 CoInitialize
- Delphi COM+中调用webservice错误提示问题解决方法
- delphi 7 调用web services时报 Invalid at the top level of the document错误的解决方法
- Delphi Dll中多线程无法使用Synchronize同步的解决方法(转)
- 程序中和有js函数的网页交互,线程中调用 get_Script 就会错误的解决方法,由于COM的线程安全问题
- WebServices调用SharePoint站点时报 找不到应用程序错误及解决方法
- DELPHI INSERT INTO 语句的语法错误 解决方法
- 调用scriptManager时提示sys未定义错误解决方法
- Delphi使用BDE连接远程MS SQL SERVER 2000数据库时出现“Db-library network communciations layer not loaded.”错误的解决方法
- php调用存储过程返回结果集,解决can't return a result set in the given context错误的方法
- Boost Python 实现C调用python错误解决方法