1、a1第十二章 ActiveX 控件的使用和创建 a2 近年来,软件产业已经发生了一场革命性的变化。软件的制作和打包方式已经不再是所有的应用程序都必须从源代码编译链接成一个完整的、很大的可执行代码文件,而是大多数应用程序都可以由一些较小的构件组成。这些小的构件,通常称为组件。这些组件可以用多种不同的程序语言创建,且可以具有多种不同的的形式。最为流行的组件之一便是 ActiveX 控件。组件不但可以作为最终软件产品提供给其他程序设计人员,而且在大型软件开发中,使用组件也是组织不同分工的程序设计人员共同完成整个软件设计开发的重要策略和方法。本章的学习目的是:a3掌握如何使用 ActiveX 控件,以
2、便在软件开发中使用第三方提供的产品化组件和如何创建自己的 ActiveX 控件,以便开发产品化组件,提供给其他程序设计者。本章的主要内容包括:什么是ActiveX 控件以及它们是如何工作的。如何在项目工作区中添加ActiveX 控件。如何在Visual C+应用程序中使用ActiveX 控件。如何调用与ActiveX 控件相关联的各种方法。如何处理由ActiveX 控件激活的事件。如何用Visual C+AppWizard 建立ActiveX 控件项目。如何用ClassWizard 向ActiveX 控件添加属性和方法。如何用Visual C+提供的工具测试自己的ActiveX 控件。a412
3、.1 什么是 ActiveX 控件 在介绍ActiveX 控件之前有必要了解另外两个编程技术概念:OLE(Object Linked and Embeded)对象连接嵌入是 Microsoft 基 于对象的技术。该技术用于跨越进程和机器边界的数据信息 和操作方法的共享。不过最初的OLE 仅仅允许把不同的应用 程序创建的文档组合成一个单一文档。COM(Component Object Model)组件对象模型是遵循OLE 基本 技术的对象模型。一个COM 对象是一个对象定义的实例,该 对象定义指定了该对象的数据和一个或多个作用于该对象的 接口执行方法。客户程序与COM 对象之间的相互作用只能通
4、过 COM 对象的接口实现。a5 ActiveX 控件就是一组封装在 COM 对象中的功能模块。这个COM 对象是独立的,但并不能单独运行,而只能在 ActiveX 容器中运行,如 Visual C+或Visual Basic 应用程序,这一点很像在组合设备中插入具有特定功能的组件,例如在组合式音响中,插入一个 DVD 播放组件。a612.1.1 ActiveX 和 IDispatch 接口 每个 COM 对象都有一些标准接口,例如,IUnknown 接口,该接口用来询问是否找到了该组件所支持的其他接口。每个接口支持一组特定的功能,例如,可以用一个接口来处理控件的可视外观,一个接口来控制控件外
5、观如何与插入该控件的应用程序进行交互,一个接口来触发插入该控件应用程序中的事件,等等。ActiveX 技术是建立在微软的 COM 技术之上,并使用 COM 的接口和交互模型使 ActiveX 控件与插入控件的应用程序进行完全无缝的集成。COM 技术奠定了构建 ActiveX 对象的方式及设计ActiveX 接口的方法。ActiveX 技术定义了建立于 COM 之上的层面、各种对象应该支持什么样的接口以及如何与不同类型的对象交互。a7 ActiveX 控件的关键技术之一是自动。所谓“自动”可描述为:将一个应用程序中嵌入另一个应用程序。当用户的操作涉及到被嵌入者的功能时,激活被嵌入者,并 控制被嵌
6、入者的用户接口或文档部分,同时进行被嵌入者自 身的更改。当用户将操作转移到应用程序中非嵌入程序的控制部分时,被嵌入者自行关闭(例如在word 应用程序中自动嵌入Excel 电子表格应用程序)。实现自动工作的关键之一是特殊(调度)接口 IDispatch。a8 ActiveX 控件可以提供的所有方法有各自的唯一标识值 DISPID。这些标识值被存放在用来查找特定方法的标识列表中。IDispatch接口由一个指示方法的标识列表和 IDispatch 接口提供的方法组成。当获取一个特定方法的 DISPID 之后,就可以将该方法的 DISPID 作为参数,通过调用 IDispatch 接口的方法 In
7、voke 来实现调用 DISPID 所标识的指定方法。下图示意性描述了 IDispatch 接口如何使用 Invoke 方法来运行 ActiveX 控件提供的方法,实现的ActiveX 控件的自动化。a9DISPID1DISPID2DISPID3DISPID4DISPIDnActiveX 对象IDispatchvtable客户程序IDispatch:Invoke(DISPID)Invoke()switch(DISPID3)case 1:MethodX();case 2:MethodY();case 3:MethodZ();调度接口a1012.1.2 ActiveX 容器和服务器 任何可以嵌入另
8、一对象的 ActiveX 对象都是 ActiveX 服务器,而无论它是一个完整的应用程序或仅仅是一个 ActiveX 控件。任何可以包含其他被嵌入 ActiveX 服务器的 ActiveX 对象都是ActiveX 容器。注意,不要把术语容器和服务器与上图中的客户程序混淆。客户程序是指调用其嵌入对象的 IDispatch 接口的对象。容器和服务器都相互调用对方的 IDispatch 接口,因此它们相互成为对方的客户程序。a11 这两种类型的 ActiveX 对象并不互相排斥。ActiveX 服务器同时也可以是 ActiveX 容器,例如,微软的 Internet Explorer Web 浏览器
9、中 Internet Explorer 是一个可以在 ActiveX 容器外壳中运行的ActiveX 服务器。可以运行该服务器的 ActiveX 容器外壳还可以包含 Word、Excel、Powerpoint 等其他应用程序,同时这些应用程序还可以作为其他应用程序的 ActiveX 服务器。ActiveX 控件是 ActiveX 服务器的一个特例,即该 服务器不能自身运行,必须被嵌入到 ActiveX 容器中。如果在 AppWizard 所创建的 MFC 应用程序项目中,设置了使用 ActiveX 组件选项,则该项目所创建的应用程序就自动成为一个 ActiveX 容器。a12 ActiveX
10、容器和 ActiveX 控件之间的大多数交互操作是通过三个IDispatch 接口完成(如下图所示)。这些 IDispatch 接口中的一个位于控件中,通过该接口,容器可以调用控件的各种方法,为容器的功能提供服务。容器也为控件提供两个 IDispatch 接口。其中一个接口用于控件在容器中触发事件。另一个接口用于容器为控件设置属性,也就是说 ActiveX 控件的大部分属性实际上由是容器提供,而由控件实现的。当设置属性时,容器调用控件中一个方法,以便通知控件从容器中读取所提供的属性。Visual C+创建了一系列关于 ActiveX 控件接口的 C+类,用户只与这些 C+类“暴露”给用户的方法
11、交互,而不需要直接调用控件的 IDispatch 接口,所以上述活动中的大部分对用户来说是“透明”的。a13ActiveX容器ActiveX控件IDispatch(事件)IDispatch(属性)IDispatcha1412.2 在应用程序项目中添加和使用 ActiveX 控件 使用Visual C+使得在应用程序项目添加和使用 ActiveX 控件变得十分方便。下面通过实例详细讲述如何创建一个可以包含ActiveX 控件的应用程序项目;如何为这个项目添加 ActiveX 控件和如何在应用程序中使用所添加的 ActiveX 控件。a1512.2.1 创建一个可以包含 ActiveX 控件的应用
12、程序1 创建一个 MFC 应用程序 项目,命名为“ActiveX”。2 选择项目类型为 Dialog Based,并在创建过程中注意选择项目 具有 ActiveX Controls 支持状态,其他均可取默认选择。3 删除缺省对话框模板 IDD_ACTIVEX_DIALOG 中的所有缺省控 件,添加一个命令按钮:标识为 IDC_EXIT,标题为 E&XIT。4 在缺省创建的 CActiveXDlg 类中,为新添加命令按钮 IDC_EXIT 的 BN_CLICKED 通知消息建立消息映射 ON_BN_CLICKED(IDC_EXIT,OnExit)和定义消息处理函数 OnExit 的原型和定义 a
13、fx_msg void OnExit();void CActiveXDlg:OnExit()OnOK();a1612.2.2 注册 ActiveX 控件 在给应用程序项目添加 ActiveX 控件之前,必须在系统中注册控件。在系统中注册 ActiveX 控件的方法有两种。一种方法是运行ActiveX 控件的安装程序,进行自动注册。另一种方法是手工注册 ActiveX 控件。手工注册的步骤如下:1 进入 DOS 控制台界面。2 将当前目录改变到 ActiveX 控件文件所在的目录中,例如:Windowssystem。a173 执行系统命令 regsvr32,并指定 ActiveX 控件名为该命令
14、的参 数。例如要注册一个文件名为 MYCTL.OCX 的 ActiveX 控件,假如该控件文件 MYCTL.OCX 在 Windowssystem 目录中,则可 执行如下命令:C:WINDOWS cd system C:WINDOWSSYSTEM regsvr32 myctl.ocxa18注意:手工注册可能会导致所注册的控件缺少某些信息,从而在开 发中无法使用,所以建议使用控件所带的安装程序。如果所使用的 ActiveX 控件在系统安装时已经被缺省注册了,则不需要使用上述方法进行控件的注册。本例中要添加的控 件就是这类 ActiveX 控件。ActiveX 控件一旦在系统中注册成功,就可以将它
15、添加到应用程序项目中。在 Visual C+6.0 中注册和添加 ActiveX 控件的步骤如下:a191 选择Project-Add To Project-Components and Controls。2 在弹出的“Components and Controls Gallery”对话框中,选择 “Registed ActiveX Controls”文件夹:a203 在该文件夹中,查找并选中要添加的已注册ActiveX 控件,本 例中选择Microsoft FlexGrid Control version 6.0 控件,双击被 选中控件选项,或按Insert按钮。a214 在提示是否确实要添
16、加该控件的对话框中,按OK按钮。5 在“Confirm Classes”对话框中,单击OK按钮添加控件所 包含的全部或部分C+类:a226 在“Components and Control Gallery”对话框中单击Close按 钮完成为项目添加控件的工作。7 控件 FlexGird 已经被添加到资源编辑器的“Control Palette”上:a238 查看工作区的 Class View,发现项目中已自动增加了与 FlexGird 控件相关的类:CMSFlexGrid、COleFont、CRowCursor 和 CPicture,每个类中都 提供了相应的方法。a24在 Visual C+.
17、NET 中注册和添加 ActiveX 控件的步骤如下:1 在 Toolbox 中,单击鼠标右键弹出的环境菜单中选择菜单项“Choose Items”:a252 在弹出的属性表Choose Toolbox Items中,选择属性页“COM Components”,在该属性页中选择所需的 ActiveX 控件“FlexGird”后,按 OK 按钮。a263 添加了 ActiveX 控件“FlexGird”后的 Toolbox 如下:注意,经过上述操作后,并不会在项目中增加封装“FlexGird”控件的类 CMsfgrid(相应的定义文件和实现文件)。只有将控件从 ToolBox 中添加到对话框模板
18、中,控件的类 CMsfgrid(相应的定义文件和实现文件)才会被自动添加到项目中。a2712.2.3 在对话框模板中添加 ActiveX 控件 ActiveX 控件添加到项目中之后,便可以像使用其他标准控件一样,把它添加对话框模板中。本例中所添加的ActiveX 控件FlexGird 的主要属性设置如下:控件名属性设置值FlexGirdIDIDC_MSFGRIDRows20Cols4MergeCellsRestrict AllFormat StringRegion|Product|Employee|Sales a28在完成对控件所有属性的设置之后,需要为该控件添加一个数值类对象m_ctrlFG
19、rid,以便能和代码中的控件进行交互。所添加的代码如下:class CActiveXDlg:public CDialogpublic:CActiveXDlg(CWnd*pParent=NULL);/standard constructorenum IDD=IDD_ACTIVEX_DIALOG;CMSFlexGridm_ctrlFGrid;a2912.2.4 在应用程序中使用 ActiveX 控件12.2.4.1 与 ActiveX 控件进行交互 本例中将使用添加的 FlexGrid 控件生成一个产品销售数字统计表,其中包括4 个销售人员在5 个销售区的销售情况。要求能够在屏幕上滚动显示数据,这
20、些数据应按能区域或产品种类分类,以比较各个销售人员在每种产品上的销售业绩。为此,首先调用 FlexGrid 控件的方法 SetTextArray 将要处理、显示的数据存入到控件的数组中,并将数组中数据将被载入表格的相应单元格中。调用 FlexGrid 控件的内置排序方法 SetSort,使表格按升序排列。为了实现这些操作需要为 CActiveXDlg 类添加如下成员函数定义:a301 把数据载入控件 添加一个私有成员函数将数据装载到 FlexGrid 控件中,该函数命名为 LoadData,函数类型为 void,其定义代码如下:void CActiveXDlg:LoadData()int li
21、Count;/The grid row count CString lsAmount;/The sales amount /Initialize the random number generator srand(unsigned)time(NULL);/Create Array in the control for(liCount=m_ctrlFGrid.GetFixedRows();liCount SelectObject(&lpen);/Draw the linepDC-MoveTo(m_ptFrom);pDC-LineTo(m_ptTo);/Reset the previous pen
22、pDC-SelectObject(pOldPen);a69 手工重载CObject 的持续化虚成员函数Serialize 并为其编码void CLine:Serialize(CArchive&ar)CObject:Serialize(ar);if(ar.IsStoring()arm_ptFromm_ptTo(DWORD)m_crColorm_ptFromm_ptTo(DWORD)m_crColorm_pnWidth;a702 CModArt 类 创建此类的目的就是要实现对一个完整涂鸦画面的描述和围绕绘制涂鸦所需要的所有操作。定义 CModArt 类 与定义 CLine 类相似,使用 Class
23、Wizard 创建一个 Generic Class类 CModArt,并在 Base Class列表框的第一行输入 CObject 作为基类,保留其 public 属性。虽然 CModArt 类也需要实现持续性,但不需要在类定义文件和实现文件中加入实现持续性的宏,原因是 CModArt 的持续性可以通过 CLine 的持续性实现。a71 为 CModArt 类增加描述整幅涂鸦的属性class CModArt:public CObject public:CRect m_rDrawArea;/绘制涂鸦的区域 CObArray m_oaLines;/用于存放组成涂鸦的所有线段的数组 private:
24、int m_iLength;/组成一条涂鸦线的最多线段数 int m_iSegments;/组成整幅涂鸦画面的最多涂鸦线数 ;a72 为 CModArt 添加一些访问和修改属性的公有成员函数int CModArt:GetLength()/Return the current value for the m_iLength variable return m_iLength;void CModArt:SetLength(int iLength)/Set the current value for the m_iLength variable m_iLength=iLength;a73int CM
25、odArt:GetSegments()/Return the current value for the m_iSegments variable return m_iSegments;void CModArt:SetSegments(int iSegments)/Set the current value for the m_iSegments variable m_iSegments=iSegments;void CModArt:SetRect(CRect rDrawArea)/Set the drawing area rectangle m_rDrawArea=rDrawArea;a74
26、 为 CModArt 添加生成一条涂鸦线的私有成员函数void CModArt:NewLine()int lNumLines,lCurLine;UINT nCurWidth;CPoint pTo,pFrom;int cRed,cBlue,cGreen;/Normalize the rectangle before determining the width and height m_rDrawArea.NormalizeRect();/Get the area width and height int lWidth=m_rDrawArea.Width();int lHeight=m_rDraw
27、Area.Height();/Determine the number of parts to this squiggle lNumLines=rand()%m_iLength;/Are there any parts to this squiggle?a75 if(lNumLines 0)/Determine the color cRed=rand()%256;cBlue=rand()%256;cGreen=rand()%256;/Determine the pen width nCurWidth=(rand()%8)+1;/Determine the strat point for the
28、 squiggle pFrom.x=(rand()%lWidth)+m_rDrawArea.left;pFrom.y=(rand()%lHeight)+m_rDrawArea.top;/Loop through the number of segments for(lCurLine=0;lCurLine Delete();/Delete the exception objectpFrom=pTo;/Set the starting point to the end point a77 为 CModArt 添加生成整幅涂鸦的公有成员函数void CModArt:NewDrawing()int l
29、NumLines,lCurLine;/Determine how many lines to create lNumLines=rand()%m_iSegments;/Are there any lines to create?if(lNumLines 0)/Loop through the number of lines for(lCurLine=0;lCurLine lNumLines;lCurLine+)NewLine();/Create the new line a78 修改 CModArt 的构造函数CModArt:CModArt()/Initialize the random nu
30、mber generator srand(unsigned)time(NULL);/Initialize the propty variables m_iLength=200;m_iSegments=50;a79 为 CModArt 添加绘制整幅涂鸦的公有成员函数 Drawvoid CModArt:Draw(CDC*pDC)/Get the number of lines in the object array int liCount=m_oaLines.GetSize();int liPos;/Are ther any objects in the array?if(liCount)/Loo
31、p through the array,drawing each object for(liPos=0;liPos Draw(pDC);a80 为 CModArt 添加清除整幅涂鸦的公有成员函数 ClearDrawingvoid CModArt:ClearDrawing()/Get the number of lines in the object array int liCount=m_oaLines.GetSize();int liPos;if(liCount)/Are there any objects in the array /Loop through the array,delet
32、ing each object for(liPos=0;liPos NET 中:a84 在“Add Property”对话框中,将该属性命名为 SquiggleLength,并指定其类型为 short 或 SHORT 类型。接受系统自动为该属性命名的内部变量名 m_squiggleLength 或 m_SquiggleLength,以及为该属性自动增加的通知函数 OnSquiggleLengthChanged。保持缺省的属性实现类型(Member variable)。单击OK或Finish按钮,完成该属性的添加操作。上述操作如下图所示:a85 在 Visual C+6.0 中:a86 在 Vi
33、sual C+.NET 中:a87 为 OnSquiggleLengthChanged 添加执行代码:在 Visual C+6.0 中的代码如下:short CSquiggleCtrl:OnSquiggleLengthChanged()m_maDrawing.SetLength(m_squiggleLength);/添加的代码 SetModifiedFlag();/缺省代码在 Visual C+.NET 中的代码如下:void CSquiggleCtrl:OnSquiggleLengthChanged()AFX_MANAGE_STATE(AfxGetStaticModuleState();/缺
34、省代码 m_maDrawing.SetLength(m_squiggleLength);/添加的代码 SetModifiedFlag();/缺省代码a88其中:m_maDrawing 是CSquiggleCtrl 的CModArt 类对象成员。调用CModArt 的成员函数SetLength 将控件从容器中获得属性 值传递给CModArt 类对象成员。调用SetModifiedFlag 设置控件被修改标志。a892 添加属性 NumberSquiggles 添加方法与 SquiggleLength 相同,系统为该属性命名的内部变量为 m_numberSquiggles,通知函数为 OnNumb
35、erSquigglesChanged该函数的源代码在 Visual C+6.0 中的代码如下:short CSquiggleCtrl:OnNumberSquigglesChanged()m_maDrawing.SetSegments(m_numberSquiggles);/添加的代码 SetModifiedFlag();/缺省代码在 Visual C+.NET 中的代码如下:void CSquiggleCtrl:OnNumberSquigglesChanged()a90AFX_MANAGE_STATE(AfxGetStaticModuleState();/缺省代码 m_maDrawing.Se
36、tSegments(m_numberSquiggles);/添加的代码 SetModifiedFlag();/缺省代码3 添加属性 KeepCurrentDrawing 添加方法 SquiggleLength 相同,而该属性的类型为 BOOL 类型或 VARIANT_BOOL,系统为该属性命名的内部变量为 m_KeepCurrentDrawing,通知函数为 OnKeepCurrentDrawingChanged。但该函数不必添加代码。a9112.3.4 设计和创建属性页 为了使用户能使用你制作的 ActiveX 控件,控件必须提供一个属性页。该属性页能向用户提供一种设置该控件属性的手段,即使
37、用户所使用的开发工具不能通过代码以外的手段来访问这些属性。向控件中添加属性页是非常容易的,浏览控件的资源,就会发现控件的属性页对话框模板已经在控件外壳的创建过程中被自动构建了。你只要根据需要编辑这个对话框模板和为对话框中的控件定义必要的关联变量成员就可以完成属性页的设计和创建。在本例中,设计创建属性页的具体步骤如下:a921 设计、编辑属性页对话框模板 在属性对话框模板中添加所需要的标准控件,并对这些控件进行布局。本例中的属性页对话框模板如下所示:a93属性页对话框中各控件描述如下:控件类别控件标识控件标题Static TextIDC_STATICMaximum Number of Squig
38、gles:Edit BoxIDC_ENBRSQUIGStatic TextIDC_STATICMaximum Length og Squiggles:Edit BoxIDC_ELENSQUIGCheck Box IDC_CMODARTINTDRAW Maintain Current Drawinga942 为控件定义关联的数据成员 注意,所定义的这些数据成员要与所创建的 ActiveX 控件的相应属性的外部名进行关联,本例中,为控件 IDC_ENBRSQUIG 定义的数据成员 m_iNbrSquiggles 必须与所创建的控件 Squiggle 的属性 NumberSquiggles 相关联。
39、具体方法如下:a95a96对话框中的组合列表框 Optional property name 用来确定与所定义的数据成员相关联的控件属性外部名。如果所关联的属性是定制属性,则将该属性的外部名直接键入列表框中;如果所关联的属性是库存属性,则可以从该列表框的下拉表中选取属性外部名。本例中所定义的属性页控件数据成员如下:通过 ClassWizard 定义属性页的上述数据成员,会在属性页的数据交换函数 DoDataExchange 中自动添加了相应的代码:变量标识变量名类别类型 关联的属性外部名IDC_CMODARTINTDRAWm_bKeepDrawing ValueBOOLKeepCurrentD
40、rawing IDC_ELENSQUIGm_iLenSquigValue IntSquiggleLengthIDC_ENBRSQUIGm_iNbrSquiggles Value intNumberSquigglesa97void CSquigglePropPage:DoDataExchange(CDataExchange*pDX)/AFX_DATA_MAP(CSquigglePropPage)DDX_Text(pDX,IDC_ELENSQUIG,m_iLenSquig);DDP_Text(pDX,IDC_ELENSQUIG,m_iLenSquig,_T(SquiggleLength);DDX_
41、Text(pDX,IDC_ENBRSQUIG,m_iNbrSquiggles);DDP_Text(pDX,IDC_ENBRSQUIG,m_iNbrSquiggles,_T(NumberSquiggles);DDX_Check(pDX,IDC_CMODARTINTDRAW,m_bKeepDrawing);DDP_Check(pDX,IDC_CMODARTINTDRAW,m_bKeepDrawing,_T(KeepCurrentDrawing);/AFX_DATA_MAP DDP_PostProcessing(pDX);a983 为 CSquiggleCtrl 的属性交换函数 DoPropExch
42、ange 添加代码 DoPropExchange 的功能与对话框的 DoDataExchange 的功能类似,它可以实现控件属性与控件属性页之间的数据交换。void CSquiggleCtrl:DoPropExchange(CPropExchange*pPX)ExchangeVersion(pPX,MAKELONG(_wVerMinor,_wVerMajor);COleControl:DoPropExchange(pPX);/TODO:Call PX_ functions for each persistent custom property.PX_Bool(pPX,KeepCurrentDr
43、awing,m_keepCurrentDrawing,FALSE);PX_Short(pPX,NumberSquiggles,m_numberSquiggles,200);PX_Short(pPX,SquiggleLength,m_squiggleLength,50);a99KeepCurrentDrawing、NumberSquiggles 和 SquiggleLength 是控件 属性页中用于设置各种属性值的操作控件的外部名。FALSE、200、50 为所设置控件属性的缺省值。a10012.3.5 添加基本控件功能 控件 Squiggle 的基本功能是对鼠标单击事件作出响应,以便生成一个新
44、的涂鸦画面。绘制操作是在控件的成员函数 OnDraw中完成的,而引起 OnDraw 被调用的原因是各种需要窗口重画的事件调用 Invalidate 函数使窗口的用户区无效。为了控制此响应操作是否发生,避免在非鼠标单击引起的调用 OnDraw 绘制新的涂鸦画面,需要为控件类 CSquiggleCtrl 添加一个控制绘制操作的另一个布尔型数据成员 m_bGenNewDrawing,同时修改CSquiggleCtrl 的构造函数和 OnDraw 函数,并添加鼠标单击事件的映射和响应函数来实现控件的基本功能。具体步骤如下:a1011 添加绘制新图的数据成员 m_bGenNewDrawingclass
45、CSquiggleCtrl:public COleControl DECLARE_DYNCREATE(CSquiggleCtrl)private:BOOL m_bGenNewDrawing;a1022 修改 CSquiggleCtrl 的构造函数 在原来的构造函数中添加对包括 m_bGenNewDrawing 在内的数据成员进行初始化。CSquiggleCtrl:CSquiggleCtrl()InitializeIIDs(&IID_DSquiggle,&IID_DSquiggleEvents);/TODO:Initialize your controls instance data here.
46、m_bGenNewDrawing=TRUE;a1033 修改成员函数 OnDraw 使绘制新图的操作在 m_bGenNewDrawing 的控制之下进行。void CSquiggleCtrl:OnDraw(CDC*pdc,const CRect&rcBounds,const CRect&rcInvalid)/TODO:Replace the following code with your own drawing code./Do we need to generate a new drawing?if(m_bGenNewDrawing)m_maDrawing.SetRect(rcBounds
47、);/Set the drawing area m_maDrawing.ClearDrawing();/Clear out the old drawing m_maDrawing.NewDrawing();/Generate the new drawing m_bGenNewDrawing=FALSE;/Reset the control flag a104 /Fill in the background pdc-FillRect(rcBounds,Brush:FromHandle(HBRUSH)GetStockObject(WHITE_BRUSH);m_maDrawing.Draw(pdc)
48、;/Draw the squiggle drawing4 添加鼠标单击响应添加库存事件 click 在 Class View 中,DSquiggleEvents 或 CSquiggleCtrl 处单击鼠标 右键,并在弹出的环境菜单中选择“Add Event”菜单项。在 弹出的对话框“Add Event”中进行所需定制事件的添加操作。在 Visual c+6.0 中,添加操作如下:a105 在 Visual c+.NET 中,添加操作如下:a106添加鼠标单击响应函数 在ClassWizard 中选择Message Maps 属性页,添加鼠标单击响 应函数OnClick,注意,在 Visual
49、C+.NET 中,是通过重定义 基类虚函数 OnClick 完成的。该函数的操作代码如下:a107void CSquiggleCtrl:OnClick(USHORT iButton)/TODO:Add your specialized code here and/or call the base class /Can we generate a new drawing?if(!m_keepCurrentDrawing)/Set the flag so a new drawing will be generated m_bGenNewDrawing=TRUE;/Invalidate the co
50、ntrol to trigger the OnDraw function Invalidate();COleControl:OnClick(iButton);a10812.3.6 添加控件方法添加定制方法 DoClick添加此函数的目的是使控件的应用程序可以模拟控件的鼠标单击事件。添加的方法:在 Visual C+6.0 中:在 Visual C+6.0 中:a109 在弹出的“Add Method”对话框中,进行如下图所示的操作。在 Visual c+6.0 中:a110在 Visual c+.NET 中:该函数的操作代码如下:a111在 Visual c+6.0 中:void CSquig