From: http://blog.csdn.net/zhoubl668/archive/2009/04/30/4139933.aspx OLE是建立在COM之上的技术,层次比COM要高.AfxOleInit()调用的是OleInitialize(),而OleInitialize()除了调用CoInitializeEx()来初始化COM库外,还进行一些其它的操作,这些操作对OLE应用来说是必须的,这些OLE应用包括:     (1)Clipboard:     (2)Drag   and   d

最近工作比较忙,在粗略分析了CoInitialize之后我们一直没有再深入研究,下面言归正传.前面我们初步了解到了CoInitialize其实是通过调用CoInitializeEx来实现功能的,而后者最终调用了wCoInitializeEx函数,如果能进一步了解这个函数的内部实现,那么我们对COM环境的初始化过程就比较清晰了.好,我们下面继续看wCoInitializeEx的汇编代码,这次我们分段来看. 769AF092 arg_0           = dword ptr  8769AF09

大家都知道程序中若要使用COM组件则必须要先调用CoInitialize,该函数主要是用来初始化COM运行环境.但这个函数的作用域是以线程为单位还是以进程为单位呢?也许大家已经通过测试程序摸索出答案,没错,是以线程为单位.今天我们就稍微再深入一下,通过分析CoInitialize的具体实现来印证我们的想法. 我们先来看看CoInitialize的汇编 769B2A24                 mov     edi, edi 769B2A26                 push  

CoInitialize(LPVOID),它将以特定参数调用CoInitializeEx,为当前单元初始化COM库,并标记协同模式为单线程模式.参数必须为NULL.这是关于OLE和COM的问题. CoInitializeEx(LPVOID),新版本,可以用参数指定协同模式,如多线程模式,但注意单元的协同模式是不能改的,如果在已经初始化为多线程的单元里初始化OLE将失败并返回RPC_E_CHANGED_MODE.每个线程只要调用一次初始化就够了,同一线程中的后续调用也将通过,但会返回S_FALSE

CoInitialize()和AfxOleInit() 都是初始化COM库,不同之处在与: OLE是建立在COM之上的技术,层次比COM要高.AfxOleInit()调用的是OleInitialize(),而 OleInitialize()除了调用CoInitializeEx()来初始化COM库外,还进行一些其它的操作,这些操作对OLE应用来说是必须的,这些OLE应用包括:      (1)Clipboard:      (2)Drag   and   drop:      (3)Object 

1.uses ActiveX; 2. procedure HLCJ.Execute;begin    CoInitialize(nil);    //要使用的控件    CoUninitialize;end;

在Delphi  多线程中出现“尚未调用CoInitialize错误”的解决方法 解决方法如下: function  TMyThread.ExecTimer: Boolean;begin  Result := False ;  FMyThreadExecfinish := False;  Screen.Cursor := crHourGlass;  CoInitialize(nil); // 一定要加上此行代码  try    TranspondClientBaseData_factory1(H

一般解决方法是在线程开始启用 CoInitialize(nil),线程结束调用 CoUninitialize .如果你使用多种数据库连接,比如三层中经常切换到MSSQL和Oracle,我们只需在判断 TUniConnection 的连接前事件 OnBeforeConnect 写下如下代码: procedure TServDBFunc.ServConnBeforeConnect(Sender: TObject); begin if (ServConn <> nil) and SameText(S

1. 由于使用ado等引起的异常. 2. 若是子线程或某方法操作ado可在该方法开头和结尾分别加上: function myfun begin CoInitialize(nil); // your code; CoUninitialize; end; 3. 在主方法加入该句子有时候不能解决问题,因为默认是初始化主线程的,只有在子线程或方法加入才行.

1.CoInitialize和CoInitializeEx的功能 CoInitialize是在当前线程初始化Com组件的函数,并且初始化为STA模式(单线程模式),一般新的程序建议使用CoInitializeEx来替代.CoInitializeEx初始化当前线程Com组件并提供更多的设置选项,如并发模式等. 2.关于并发模型的说明(concurrency model) 并发模型类型 下面两种不能同时设置 COINIT_APARTMENTTHREADED 这个模式允许多线程调用,但是多线程所有的调

关于多线程中创建使用TADOConnect.TADODataSet等Com组件时,必须先初始化Com 在多线程启用执行前 CoInitialize(nil); 在多线程启用执行后 CoUninitialize;

本人封装了一个类,里面需要用到ADO连接数据库, 所以需要初始化COM环境以及释放COM环境, 我打算在构造函数里面执行CoInitialize,在析构函数里面执行CoUninitialize 但是程序运行时,在析构函数中调用CoUninitialize,程序崩溃了~ CoUninitialize()引起系统异常推出 Closes the COM library on the current thread, unloads all DLLs loaded by the thread, frees

原文转自 https://www.cnblogs.com/manors/archive/2010/05/17/COM_Initialize_STA_MTA.html 与设备打交道时,我们经常用到COM组件,比如音视频设备(麦克风.播放器.摄像头等). 调用任何COM组件之前,你必须首先初始化COM套件环境,即调用CoInitialize或CoInitializeEx.COM套件环境在线程的生存周期内有效,线程退出前需要调用CoUninitialize释放COM套件. 所谓COM套件,实际上是微软

调用任何COM组件之前,你必须首先初始化COM套件环境,即调用CoInitialize或CoInitializeEx.COM套件环境在线程的生存周期内有效,线程退出前需要调用CoUninitialize释放COM套件. 所谓COM套件,实际上是微软为了方便大家理解而起的一个名字,不过个人认为改名词很难理解.COM套件只指COM组件运行时的环境,其中包括COM组件的数据.变量.线程调度方式. COM套件分为两种模式,单线程套件(STA)和多线程套件(MTA).不要单从字面上理解,例如:STA并非只

ADO线程不安全,UniDAC 在使用MSSQL也是如此.其实这是微软COM问题,不怪Devart公司. 一般解决方法是在线程开始启用 CoInitialize(nil),线程结束调用 CoUninitialize .如果你使用多种数据库连接,比如三层中经常切换到MSSQL和Oracle,我们只需在判断 TUniConnection 的连接前事件 OnBeforeConnect 写下如下代码: procedure TServDBFunc.ServConnBeforeConnect(Sender:

原帖地址 http://bbs.csdn.net/topics/390481350 解决办法 procedure DisplayVideoInfo; var wmi, objs, obj : OleVariant; enum           : IEnumVariant; value          : Cardinal; begin try CoInitialize(nil);//  加上这两句 wmi := CreateOleObject('WbemScripting.SWbemLoc

在项目中为了用API访问Wmi Object来实现命令wmic的功能,所以得使用COM库,使用COM库之前得初始化一些东西. m_hr = CoInitializeEx(, COINIT_APARTMENTTHREADED); if (FAILED(m_hr)) { std::ostringstream errorStream; errorStream << "Failed to initialize COM library. Error code = 0x" <&l

当我们运行一个Windows服务的时候,一般情况下,我们会选择以非窗口或者非控制台的方式运行,这样,它就只是一个后台程序,没有界面供我们进行交互. 那么当我们想与Windows服务进行实时交互的时候,我们应该怎么做呢? 快速给Windows服务添加实时交互功能的方案 Windows服务是一个进程,而我们用于交互的程序,又是另外一个进程.我们与Windows服务实时交互,其实就是一个进程间通信的问题.所有的进程间通信的方案基本上都适用于实时交互的方案,比如Socket.共享内存.管道.COM等.

使用MSXML.DLL读写XML; 文件顶部加入 #import "msxml3.dll"; using namespace MSXML2; //这两句作用是,在程序的文件夹下生成MSXML3.TLH和MSXML3.TLI两个文件; --------------------------------------------------------- 创建一个XML文件; ::CoInitialize(NULL); MSXML2::IXMLDOMDocumentPtr XMLDOC; MS

1,安装钩子过程可以通过SetWindowsHookEx函数来完成 2,得到当前线程ID,可以用GetCurrentThreadId 3,移除钩子可以用UnhookWindowsHookEx函数 4,获得动态链接库的句柄有两种方法:可以使用DllMain函数,用一个全局变量来保存系统传给它的句柄:用GetModuleHandle获取指定模块的句柄 5,创建新的结可以用 #pragma data_seg("MySeg")  #pragma data_seg()把变量包含起来,包含的变量必