MFC- ActiveX编程（孙鑫C++第十八讲笔记整理 )

一：在VB中调用X控件，添加方法 project->Add components。另外可以用Object Browser来查看控件

 

二：在VC中创建X控件

1.新建一个X工程名为Clock，注意一个文件中可以包含多个控件。

2.保持缺省设置，完成。注意它生成的三个类，以及相关的接口。

3.运行它。选择TSTCON32.exe作为容器。

4.选择Insert Control,此时我们可以看到，它画了一个椭圆。也可以在VB中测试。

5.删除注册信息。用regsvr32 /u +文件名。也可以在菜单选择反注册命令。

6.重写代码。在CClockCtrl::OnDraw()中画了一个椭圆，此时我们在其中得到系统时间，并显示它。为此我们在OnCreate()设置了一个定时器，每隔一定时间发出一个Invalidate()消息，使窗口重绘。

7.如何改变控件的背景色和前景色？ClassWizard->AutoMation->Add Property->BackColor,还需要在OnDraw()中加上相应的代码

CBrush brush(TranslateColor(GetBackColor()));

pdc->FillRect(rcBounds, &brush);

pdc->SetBkMode(TRANSPARENT);

pdc->SetTextColor(TranslateColor(GetForeColor()));

8.增加属性页。在

BEGIN_PROPPAGEIDS(CClockCtrl, 2)此时数目也得改成相应的数目

PROPPAGEID(CClockPropPage::guid)

PROPPAGEID(CLSID_CColorPropPage)

END_PROPPAGEIDS(CClockCtrl)  OK~

9.增加自定义属性：ClassWizard->AutoMation->Add Property加上一个变量m_interval,类型为short,对应外部变量为Interval。在CClockCtrl中增加OnIntervalChanged方法。添加如下代码：

   if(m_interval<0 || m_interval>6000)

 {

  m_interval=1000;

 }

 else

 {

  m_interval=m_interval/1000*1000;

  KillTimer(1);

  SetTimer(1,m_interval,NULL);

  BoundPropertyChanged(0x1);

 }

 10.测试：Control->Invoke Methods

 11.将时间间隔加到属性页中，在资源视图中加入一文本框和编辑框。为EditBox关联成员变量，加入属性interval。

 12.增加方法：ClassWizard->AutoMation->Add Method->Hello加入代码 OK！在VB中可以调用此方法！

   void CClockCtrl::Hello()

{

 // TOD Add your dispatch handler code here

 MessageBox("Hello world!");

}

 13.增加事件:ClassWizard->AutoMation->Add Events->Click

 14.增加自定义事件：ClassWizard->AutoMation->Add Events->NewMinute

      在新的一分钟到达时发出这个通知，在OnDraw()中写代码：

       CTime time=CTime::GetCurrentTime();

 if(0==time.GetSecond())

 {

  FireNewMinute();

 }

15.让Interval属性具有持久性。在CClockCtrl::DoPropExchange()中调用PX_short()方法，OK！

    PX_Short(pPX,"Interval",m_interval,1000);

16.让Property Page和Property属性中的interval保持一致的方法：在OnIntervalChanged()中调用BoundPropertyChanged(0x1);

17.希望控件在设计时间内不走动的方法：在OnTimer()中， if(AmbientUserMode())InvalidateControl();巧妙！

 

 

三：在VC中调用X控件

1.新建ClockTest对话框应用程序

2.点击右键->插入X控件->时钟控件

3.Project->Add Component会生成CClock类。

4.在CCLockTestDlg中增加CClock类的成员变量m_clock，然后可以动态创建一个这样的东东！

5.试验Click(),NewMinute(),SetBkColor(),SetForeColor()方法和属性

6.如何为动态创建的控件做事件响应呢？首先你得知道它的ID号，然后参考非动态的控件事件代码。

 

下面是具体的代码：

1创建一个MFC ActiveX ControWizard项目，什么都不用做，直接运行，就能有一个Activex控件了，其作用是生成一个椭圆

运行，直接注册到了系统，所以在别的地方能够找到生成的ActiveX控件

这里在VS2008中的VB来测试。

右键---->选择项---->

 

此时工具箱就多了一个控件

拖动到窗口，效果如下：

项目文件Debug中含有：

 

在运行 输入

然后把上面的ocx文件拖进去，按确定，反编译，使得从注册表中移除

 

 

然后运行MFCXXX，找不到ActiveX找不到控件

 

使用Tools下的Register Contrl可以注册ActiveX

或者运行 regsvr32  再把ocx文件拖进来 就可以注册了，跟上面一样，只是去掉了/u

 

下面开始做自己的|ActiveX了

[cpp] view plaincopy

1. void CATestCtrl::OnDraw(  
2.             CDC* pdc, const CRect& rcBounds, const CRect& rcInvalid)  
3. {  
4.     // TODO: Replace the following code with your own drawing code.  
5.     //pdc->FillRect(rcBounds, CBrush::FromHandle((HBRUSH)GetStockObject(WHITE_BRUSH)));  
6.     //pdc->Ellipse(rcBounds);  
7.     //上面两句是默认的，画椭圆  
8.     CTime c=CTime::GetCurrentTime();  
9.     CString cstring=c.Format("%H:%M:%S");  
10.     pdc->TextOut(0,0,cstring);  
11. }  

一个静止的时间，要想它动态的显示，还得加上SetTimer函数和wm_timer

在CXXctrl中添加一个WM_CREATE然后里面Settimer

SetTimer(1,1000,NULL);

添加wm_timer

[cpp] view plaincopy

1. void CATestCtrl::OnTimer(UINT nIDEvent)   
2. {  
3.     // TODO: Add your message handler code here and/or call default  
4.       
5.     //Invalidate();  
6.     InvalidateControl();  
7.     COleControl::OnTimer(nIDEvent);  
8. }  

这个时候就能显示一个动态显示的时钟了

 

在VB中使用刚刚新建的ActiveX，发现只有很少的属性

这个时候  我们可以添加自己的属性：

 

这个时候，VS中VB可以显示响应的属性了

 

此时在OnDraw中 要相应的添加代码，要不然，设置了背景色和前景色都不起作用

[cpp] view plaincopy

1. CBrush cbrush(TranslateColor(GetBackColor()));  
2.     pdc->FillRect(rcBounds,&cbrush);  
3.     pdc->SetBkMode(TRANSPARENT);  
4.     pdc->SetTextColor(TranslateColor(GetForeColor()));  

 

[cpp] view plaincopy

1. void CATestCtrl::OnDraw(  
2.             CDC* pdc, const CRect& rcBounds, const CRect& rcInvalid)  
3. {  
4.     // TODO: Replace the following code with your own drawing code.  
5.     //pdc->FillRect(rcBounds, CBrush::FromHandle((HBRUSH)GetStockObject(WHITE_BRUSH)));  
6.     //pdc->Ellipse(rcBounds);  
7.     //上面两句是默认的，画椭圆  
8.   
9.   
10.     CBrush cbrush(TranslateColor(GetBackColor()));  
11.     pdc->FillRect(rcBounds,&cbrush);  
12.     pdc->SetBkMode(TRANSPARENT);  
13.     pdc->SetTextColor(TranslateColor(GetForeColor()));  
14.   
15.     CTime c=CTime::GetCurrentTime();  
16.     CString cstring=c.Format("%H:%M:%S");  
17.     pdc->TextOut(0,0,cstring);  
18. }  

手动添加属性页

[cpp] view plaincopy

1. BEGIN_PROPPAGEIDS(CATestCtrl, 2)  
2.     PROPPAGEID(CATestPropPage::guid)  
3.     PROPPAGEID(CLSID_CColorPropPage)  
4. END_PROPPAGEIDS(CATestCtrl)  

 

 

添加自定义属性：

 

[cpp] view plaincopy

1. void CATestCtrl::OnJianGeChanged()   
2. {  
3.     // TODO: Add notification handler code  
4.   
5.     if(m_jianGe<0||m_jianGe>6000)  
6.     {  
7.         m_jianGe=1000;  
8.     }  
9.     else  
10.     {  
11.         m_jianGe=m_jianGe/1000*1000;  
12.         KillTimer(1);  
13.         SetTimer(1,m_jianGe,NULL);  
14.     }  
15.     SetModifiedFlag();  
16. }  

 

属性面板的 有的能看间JianGe有的不能看到

将这个添加到属性页去

添加关联

 

最后一项是属性名

 

 可以为ActiveX添加(标准的和自定义的)事件和函数。

 

 MFC中添加该类