COM组件开发实践(八)---多线程ActiveX控件和自动调整ActiveX控件大小(下)
源代码下载:MyActiveX20081229.rar
声明:本文代码基于CodeProject的文章《A Complete ActiveX Web Control Tutorial》修改而来,因此同样遵循Code Project Open License (CPOL)。
在上一篇文章《COM组件开发实践(七)---多线程ActiveX控件和自动调整ActiveX控件大小(上)》中介绍了ActiveX控件中使用多线程的基本需求,并提出了一个简单的线程模型,但却出现了意想不到的问题,本文将尝试给出问题的一个可行的解法,并同时解决上文中提出的第二个问题。
其实解决的思路也很简单,一开始我也早就想到了的,就是使用让子线程PostMessage来发出自定义的消息来通知主线程,特定的事件已经发生了,需求主线程去响应。这不是什么了不起的想法,但我对子线程PostMessage非常恐惧,因为以前的一个项目中就是这个问题导致了内存泄露,所以这个方案一开始就被我否定了。
遍寻解决之道不可得时,只得在csdn的论坛上发贴求教高手了,具体的讨论请参考这个帖子:
http://topic.csdn.net/u/20081226/17/9bf0ae08-c54d-4934-b1b2-91baa27ff76e.html
看到jameshooo(胡柏华)的回帖后,还是决定回到起点,尝试用PostMessage这个方案。
首先自定义两个事件,分别表示操作成功和操作失败

#define WM_OPTSUCCESS WM_APP+101 //操作成功
#define WM_OPTFAILED WM_APP+102 //操作失败

然后回调函数中就变得非常简单,只需要post对应的事件即可。

/////////////////////
//回调函数
/////////////////////////
void CMyActiveXCtrl::OnSuccesful()
{//操作成功
this->PostMessage(WM_OPTSUCCESS,(WPARAM)NULL,(LPARAM)NULL);
}
void CMyActiveXCtrl::OnFailed()
{//操作失败
this->PostMessage(WM_OPTFAILED,(WPARAM)NULL,(LPARAM)NULL);
}

再重载消息处理函数WindowProc,在其中调用外部的JavaScript函数或者Fire出外部页面可以响应的事件。

LRESULT CMyActiveXCtrl::WindowProc(UINT msg, WPARAM wParam, LPARAM lParam)
{
switch (msg)
{
case WM_OPTSUCCESS:
{//操作成功,通知外部页面
CString strOnLoaded("OnLoaded");
this->CallJScript(strOnLoaded);
return 0;
}
case WM_OPTFAILED:
{//操作失败,通知外部页面
//这里不写了,同上面
}
}
return COleControl::WindowProc(msg,wParam,lParam);
}

在OnCreate函数中加入启动工作线程代码:

int CMyActiveXCtrl::OnCreate(LPCREATESTRUCT lpCreateStruct)
{
if (COleControl::OnCreate(lpCreateStruct) == -1)
return -1;
m_MainDialog.Create(IDD_MAINDIALOG, this);
pThread.SetICallBack(this);//设置主线程回调函数
pThread.Start();//启动工作线程
return 0;
}

重载掉OnClose函数,在其中加入关闭工作线程的代码:

void CMyActiveXCtrl::OnClose(DWORD dwSaveOption)
{
pThread.Stop(true);//强行关闭工作线程
COMRELEASE(pWebBrowser);
COMRELEASE(pHTMLDocument);
COleControl::OnClose(dwSaveOption);
}

到此为止,一个多线程的ActiveX控件就诞生了。这里是不会发生以前我遇到的内存泄露的,因为情况不同了,只是在回调函数中简单的post一个message,并没有new一个内存区域并将这块内存作为参数post给主线程,后面这种情况是可能会内存泄露的。
Ok,下面来考虑第二个问题,先简单介绍下具体需求:就是一个AcitveX控件会用到不同的页面中,每个页面对这个控件的需求也不同,也就要求在两个不同的页面中,控件显示的大小也不同。
jameshooo(胡柏华) 回帖说:“改变控件大小要通知容器,由容器再反过来通知控件改变大小,不然没有任何效果。调用IOleInPlaceSite::OnPosRectChange即可”。因此就根据这个来尝试提出一个解决方案来。
假设有两种模式的控件,一种是“普通”模式, 如下图所示:

一种是“特殊”模式,

为了区别开两者,就考虑在web页面中通过设置参数的方式来通知ActiveX控件,对于不同的模式填充不同的对话框就可以了。我们在web页面中控件部分加入如下参数:

<PARAM NAME="IsSpecial" VALUE="TRUE">

相应的在CMyActiveXCtrl类中加入一个变量,这里为简单起见,选择了类型为CString型,主要是为了传参数方便。

CString m_bIsSpecial;//是否是"特殊"页面

Web页面传入的参数值在下面这个函数中读取:

void CMyActiveXCtrl::DoPropExchange(CPropExchange* pPX)
{
ExchangeVersion(pPX, MAKELONG(_wVerMinor, _wVerMajor));
COleControl::DoPropExchange(pPX);
PX_String(pPX, _T("IsSpecial"), m_bIsSpecial); //读取外部设置的参数
}

为了供控件选择,这里提供了两种模式的对话框:

public:
CMyDlgTwo m_dlgSpecial;//特殊模式
CMyDlgThree m_dlgCommon;//普通模式

然后在创建和绘制对话框时,通过检测参数是否为空就知道待创建的对话框类型到底是“普通“还是”特殊“了。

int CMyActiveXCtrl::OnCreate(LPCREATESTRUCT lpCreateStruct)
{
if (COleControl::OnCreate(lpCreateStruct) == -1)
return -1;
CRect newRc;
if(m_bIsSpecial.Compare(_T(""))==0)
{//没设置参数,"普通“模式
this->m_dlgCommon.Create(IDD_DIALOG3,this);
//设置控件的大小
newRc.left = 0;
newRc.top = 0;
newRc.right = 200;
newRc.bottom = 200;
}
else
{//设置了参数,”特殊“模式
this->m_dlgSpecial.Create(IDD_DIALOG2,this);
//设置控件的大小
newRc.left = 0;
newRc.top = 0;
newRc.right = 200;
newRc.bottom = 200;
}
this->m_pInPlaceSite->OnPosRectChange(&newRc);
return 0;
}
void CMyActiveXCtrl::OnDraw(
CDC* pdc, const CRect& rcBounds, const CRect& rcInvalid)
{
if (!pdc)
return;
if(m_bIsSpecial.Compare(_T(""))==0)
{//没设置参数,"普通“模式
this->m_dlgCommon.MoveWindow(rcBounds,TRUE);
}
else
{//设置了参数,”特殊“模式
this->m_dlgSpecial.MoveWindow(rcBounds,TRUE);
}
}

这种方法对于我目前的需求刚好是满足的,但也许还有其他更好的方法,也希望有知道的能贡献出来,一起学习下。
作者:phinecos(洞庭散人)
出处:http://phinecos.cnblogs.com/
本文版权归作者和博客园共有,欢迎转载,但请保留此段声明,并在文章页面明显位置给出原文连接。
作者:洞庭散人
出处:http://phinecos.cnblogs.com/
COM组件开发实践(八)---多线程ActiveX控件和自动调整ActiveX控件大小(下)的更多相关文章
- ASP.NET自定义控件组件开发 第一章 第一章:从一个简单的控件谈起
第一章:从一个简单的控件谈起 系列文章链接: ASP.NET自定义控件组件开发 第一章 待续 ASP.NET自定义控件组件开发 第一章 第二篇 接着待续 ASP.NET自定义控件组件开发 第一章 第三 ...
- Vue组件开发实践之scopedSlot的传递
收录待用,修改转载已取得腾讯云授权 导语 现今的前端开发都讲究模块化组件化,即把公共的交互和功能封装到一个个的组件之中,在开发整体界面的时候就能像搭积木一样快速清晰高效.在使用Vue开发我们的vhtm ...
- COM组件开发实践(七)---多线程ActiveX控件和自动调整ActiveX控件大小(上)
声明:本文代码基于CodeProject的文章<A Complete ActiveX Web Control Tutorial>修改而来,因此同样遵循Code Project Open L ...
- COM组件开发实践(一)
Preface 因为项目需要,开始从事ActiveX方面的工作,看了一些资料,可惜都是些COM原理方面的,没有切合实际动手的东西,在CodeProject上读完David Marcionek的文章[1 ...
- Salesforce Lightning开发学习(二)Component组件开发实践
lightning的组件区分标准组件.自定义组件和AppExchange组件.标准组件由SF提供,自定义组件由developer自行开发,AppExchange组件由合作伙伴建立.下面我们写一个简单的 ...
- iOS开发实践之多线程(单例模式)
单例模式的作用:可以保证在程序运行过程,一个类只有一个实例,而且该实例易于供外界访问,从而方便地控制了实例个数,并节约系统资源. 单例模式的使用场合:在这个应用程序中,共享一份资源(这份资源只需要创建 ...
- Delphi组件开发教程指南目录
用Delphi开发的时间也不短了!刚接触Delphi的时候,就觉得组件这个东西非常方便!根本不必知道组件内部的作为,只要使用就好了!然而用的多了,也不免会对各种delphi组件的内部实现方式产生兴趣! ...
- 用C#编写ActiveX控件,开发浏览器控件,注册ActiveX 控件
用C#编写ActiveX控件,开发浏览器控件,注册ActiveX 控件用C#编写ActiveX控件 开发浏览器控件这是本控件开发完成后的一个简单应用.我们可以利用它以本地文件夹为单位来批量更新服务器的 ...
- ASP.NET自定义控件组件开发 第三章 为控件添加事件 后篇
原文:ASP.NET自定义控件组件开发 第三章 为控件添加事件 后篇 第三章 为控件添加事件 后篇 前一篇文章只是简单的说了下事件,但是大家应该方法,在ASP.NET自定义控件中只是简单那么定义事件是 ...
随机推荐
- 类linux 系统iptables 系统初始化配置
#!/bin/bash iptables -F iptables -X /etc/rc.d/init.d/iptables save service iptables restart iptables ...
- 最详细的 HTTPS 科普扫盲帖
为什么需要https HTTP是明文传输的,也就意味着,介于发送端.接收端中间的任意节点都可以知道你们传输的内容是什么.这些节点可能是路由器.代理等. 举个最常见的例子,用户登陆.用户输入账号,密码, ...
- 十分钟搭建自己的hadoop2/CDH4集群
版本及准备 我部署的是hadoop-2.0.0-cdh4.2.0.tar.gz,下载地址为http://archive.cloudera.com/cdh4/cdh/4/hadoop-2.0.0-cdh ...
- linux之getcwd函数解析
[lingyun@localhost getcwd]$ cat getcwd.c /********************************************************** ...
- 反转int型数字
如 321 反转 123 120 反转21 注意处理最后的零,以及负数情况 ,最后就是溢出情况了 /** * @param {number} x * @return {number} */ var r ...
- [Immutable.js] Transforming Immutable Data with Reduce
Immutable.js iterables offer the reduce() method, a powerful and often misunderstood functional oper ...
- IoC容器Autofac正篇之简单实例
先上一段代码. namespace ConsoleApplication3 { class Program { static void Main(string[] args) { ContainerB ...
- 解决Xcode6.4安装插件后插件不能使用的问题
下面是上网查的方法,综合了一下,亲测 原因: 苹果要求加入UUID证书从而保证插件的稳定性. 解决方法: 一.查看Xcode的UUID 在终端执行 defaults read /Application ...
- 跨域调用webservice
本人第一次在博客园写博客. 最近研究js的跨域调用,举个小例子. ASP.net 中webservice 源代码 /// <summary> /// Service1 的摘要说明 ...
- JS 根据Url参数名称来获取对应的值 方法封装
function GetQueryString(name) { var reg = new RegExp("(^|&)" + name + "=([^&] ...