创建控件全过程

最新推荐文章于 2024-08-24 11:00:49 发布

weixin_34075268

最新推荐文章于 2024-08-24 11:00:49 发布

阅读量110

点赞数

文章标签： python

原文链接：https://my.oschina.net/u/1469992/blog/275330

版权

2019独角兽企业重金招聘Python工程师标准>>>

一、MFC ActiveX控件开发步骤(VC 6.0):

　　New->Projects->MFC ActiveX ControlWizard，然后输入MFCWinSock工程名。如下图：

　　图片看不清楚？请点击这里查看原图（大图）。

　　图一创建工程

　　一路狂按Next，直至Finsh出现，再按下OK，如下图:

　　图二创建完成

　　二、架设Socket环境：

　　首先在StdAfx.h文件中加入下面这句代码:

#include　<afxsock.h>

//　MFC　socket　extensions　

　　打开MFCWinSock.cpp文件，添加代码，看起来如下：

//　CMFCWinSockApp::InitInstance　-　DLL　initialization

BOOL　CMFCWinSockApp::InitInstance()

{

BOOL　bInit　=　COleControlModule::InitInstance();

if　(bInit)

{

//　TODO:　Add　your　own　module　initialization　code　here.

if　(!AfxSocketInit())

{

AfxMessageBox("无法初始化Socket,请检查!");

return　FALSE;

}

WSADATA　wsaData;

WORD　wVersion　=　MAKEWORD(1,　1);//设定为Winsock　1.1版

int　errCode;

errCode　=　WSAStartup(wVersion,　&wsaData);//启动Socket服务

if　(errCode)

{

AfxMessageBox("无法找到可以使用的　WSOCK32.DLL");

return　FALSE;

}

return　bInit;

}

//　CMFCWinSockApp::ExitInstance　-　DLL　termination

int　CMFCWinSockApp::ExitInstance()

{

//　TODO:　Add　your　own　module　termination　code　here.

WSACleanup();//结束网络服务

return　COleControlModule::ExitInstance();

}

　　三,提供控件接口和事件

　　在MFCWinSockCtl.cpp加入如下代码:

#ifndef　WM_MYWINSOCK　

#define　WM_MYWINSOCK　WM_USER+1888

#endif

　　View->ClassWizard->Automation->Add Method…如下图:

　　图片看不清楚？请点击这里查看原图（大图）。

　　图三创建接口

　　这个时候，我们为这个控件添加了一个Connect()的接口，出于通用性，安全性和扩展性的考虑，我们采用了VARIANT类型的参数，

　　很多人可能都不太了解该类型，又或者有接触过，但被吓怕了，那么我们来看清它的本来面目：

struct　tagVARIANT

　　{

　　union　

　　　　{

　　　　struct　__tagVARIANT

　　　　　　{

　　　　　　VARTYPE　vt;

　　　　　　WORD　wReserved1;

　　　　　　WORD　wReserved2;

　　　　　　WORD　wReserved3;

　　　　　　union　

　　　　　　　　{

　　　　　　　　LONG　lVal;

　　　　　　　　BYTE　bVal;

　　　　　　　　SHORT　iVal;

　　　　　　　　FLOAT　fltVal;

　　　　　　　　DOUBLE　dblVal;

　　　　　　　　VARIANT_BOOL　boolVal;

　　　　　　　　_VARIANT_BOOL　bool;

　　　　　　　　SCODE　scode;

　　　　　　　　CY　cyVal;

　　　　　　　　DATE　date;

　　　　　　　　BSTR　bstrVal;

　　　　　　　　IUnknown　__RPC_FAR　*punkVal;

　　　　　　　　IDispatch　__RPC_FAR　*pdispVal;

　　　　　　　　SAFEARRAY　__RPC_FAR　*parray;

　　　　　　　　BYTE　__RPC_FAR　*pbVal;

　　　　　　　　SHORT　__RPC_FAR　*piVal;

　　　　　　　　LONG　__RPC_FAR　*plVal;

　　　　　　　　FLOAT　__RPC_FAR　*pfltVal;

　　　　　　　　DOUBLE　__RPC_FAR　*pdblVal;

　　　　　　　　VARIANT_BOOL　__RPC_FAR　*pboolVal;

　　　　　　　　_VARIANT_BOOL　__RPC_FAR　*pbool;

　　　　　　　　SCODE　__RPC_FAR　*pscode;

　　　　　　　　CY　__RPC_FAR　*pcyVal;

　　　　　　　　DATE　__RPC_FAR　*pdate;

　　　　　　　　BSTR　__RPC_FAR　*pbstrVal;

　　　　　　　　IUnknown　__RPC_FAR　*__RPC_FAR　*ppunkVal;

　　　　　　　　IDispatch　__RPC_FAR　*__RPC_FAR　*ppdispVal;

　　　　　　　　SAFEARRAY　__RPC_FAR　*__RPC_FAR　*pparray;

　　　　　　　　VARIANT　__RPC_FAR　*pvarVal;

　　　　　　　　PVOID　byref;

　　　　　　　　CHAR　cVal;

　　　　　　　　USHORT　uiVal;

　　　　　　　　ULONG　ulVal;

　　　　　　　　INT　intVal;

　　　　　　　　UINT　uintVal;

　　　　　　　　DECIMAL　__RPC_FAR　*pdecVal;

　　　　　　　　CHAR　__RPC_FAR　*pcVal;

　　　　　　　　USHORT　__RPC_FAR　*puiVal;

　　　　　　　　ULONG　__RPC_FAR　*pulVal;

　　　　　　　　INT　__RPC_FAR　*pintVal;

　　　　　　　　UINT　__RPC_FAR　*puintVal;

　　　　　　　　struct　__tagBRECORD

　　　　　　　　　　{

　　　　　　　　　　PVOID　pvRecord;

　　　　　　　　　　IRecordInfo　__RPC_FAR　*pRecInfo;

　　　　　　　　　　}

__VARIANT_NAME_4;

　　　　　　　　}

__VARIANT_NAME_3;

　　　　　　}

__VARIANT_NAME_2;

　　　　DECIMAL　decVal;

　　　　}

__VARIANT_NAME_1;

　　};

它先是一个结构体，里面有一个重要成员VARTYPE vt；vt即是指明当前的数据类型，比如整型或者字符型，当指明vt后，

后面看到各种变量类型包括在一个联合体当中，也就是说指明vt后，你只能使用对应的其中之一变量类型。看着这众多的各种不同类型变量集中在一起，确实让人吓了一跳，但细细看来，大多数变量跟我们平时的用法相似。值得一提的是SAFEARRAY __RPC_FAR *parray;

　　也许有很多人还没有接触过SAFEARRAY类型的变量，SAFEARRAY实际上也是一个结构，大家可以参考MSDN，我也将在后面介绍它的具体使用方法。

　　用同样的方法创建DisConnect()接口

　　创建两个事件，FireCloseWinsock()响应网络断开事件，FireRecvSockEvent()响应网络有数据到达的事件。创建方法如下图：

　　图片看不清楚？请点击这里查看原图（大图）。

　　图四创建事件

　　重载控件消息处理函数WindowProc(),在View->ClassWizard中打开类向导,在消息映射中找到WindowProc,如下图:

　　图片看不清楚？请点击这里查看原图（大图）。

　　图五重载WindowProc()

　　四、编写代码

　　编写VariantToLong()转换函数，该函数代码如下：

//类型转换,将VARIANT类型转换成Long类型

long　CMFCWinSockCtrl::VariantToLong(const　VARIANT　&var)

{

long　r;

switch(var.vt)

{

case　VT_UI2://USHORT

r　=　var.uiVal;

break;

case　VT_UI4://ULONG

r　=　var.ulVal;

break;

case　VT_INT://INT

r　=　var.intVal;

break;

case　VT_UINT://UINT

r　=　var.uintVal;

break;

case　VT_I4://LONG

r　=　var.lVal;

break;

case　VT_UI1://BYTE

r　=　var.bVal;

break;

case　VT_I2://SHORT

r　=　var.iVal;

break;

case　VT_R4://FLOAT

r　=　(long)var.fltVal;

break;

case　VT_R8://DOUBLE

r　=　(long)var.dblVal;

break;

default:

r　=　-1;//无法转换该值

break;

}

return　r;

}

大家可以看到,该函数将最基本的若干中数据类型转换成了long类型,但VARIANT决不是个简单的谱,我将在后面继续揭开它的神秘面纱.

　　编写我们刚才的接口Connect()，代码代码如下：在MFCWinSockCtrl.h中加入

SOCKET　OnlySock;//建立的唯一Socket,不允许重复建立多个

bool　isOnlyConnect;//是否建立了连接

然后再编写Connect()，看起来如下：

BOOL　CMFCWinSockCtrl::Connect(const　VARIANT　FAR&　RemoteHost,　const　VARIANT　FAR&　RemotePort)　

{

//　TODO:　Add　your　dispatch　handler　code　here

if(isOnlyConnect)//该连接已建立,还没有断开

return　FALSE;

CString　IPAddress;

int　Port;//转换成整型的端口

switch(RemoteHost.vt)

{

case　VT_BSTR://字符串型

IPAddress　=　CString(RemoteHost.bstrVal);

break;

case　VT_BYREF|VT_I1://CHAR　*

IPAddress.Format("%s",RemoteHost.pcVal);//RemoteHost.pbstrVal);

break;

default:

IPAddress　=　"";

return　FALSE;

}

Port　=　VariantToLong(RemotePort);//我们编写的一个VARIANT转换成long类型的函数

if(Port<=0)

return　FALSE;

_TCHAR　*ip　=　0;

struct　hostent　*host　=　0;

struct　sockaddr_in　addr;

ULONG　dotIP　=　inet_addr(IPAddress);

OnlySock　=　socket(AF_INET,　SOCK_STREAM,　0);

//　判断是否为点IP地址格式

if　(OnlySock　==　INVALID_SOCKET)

{

shutdown(OnlySock,　0x02);

closesocket(OnlySock);//释放占有的SOCK资源

return　FALSE;

}

　　memset(&addr,　0,　sizeof(struct　sockaddr_in));

　　//　设定　SOCKADDR_IN　结构的内容

　　//　如果通讯协议是选择IP　Protocol，那此值固定为AF_INET

　　//　AF_INET　与　PF_INET　这两个常量值相同

　　addr.sin_family　=　AF_INET;

　　addr.sin_port　=　htons(Port);

　　addr.sin_addr.S_un.S_addr　=　dotIP;

　　if　(dotIP　==　INADDR_NONE)

　　{

　　　　host　=　gethostbyname(IPAddress);

　　　　if　(!host)

　　　　{

shutdown(OnlySock,　0x02);

closesocket(OnlySock);//释放占有的SOCK资源

return　FALSE;

　　　　};

　　　　ip　=　inet_ntoa(*(struct　in_addr*)(*host->h_addr_list));

　　　　addr.sin_addr.S_un.S_addr　=　inet_addr(ip);

　　}

　　//开始连线

　　if　(connect(OnlySock,　(LPSOCKADDR)&addr,　sizeof(SOCKADDR)))

　　{

　　　　shutdown(OnlySock,　0x02);

closesocket(OnlySock);//释放占有的SOCK资源

return　FALSE;

　　}

int　　iError　=　WSAAsyncSelect(OnlySock,　m_hWnd,WM_MYWINSOCK,　FD_READ|FD_CLOSE);　//只对网络断开和数据到达通知感兴趣

if(iError　==　SOCKET_ERROR)//无法绑定Winsock的事件通知

{　　

shutdown(OnlySock,　0x02);

closesocket(OnlySock);//释放占有的SOCK资源

return　FALSE;

}　

isOnlyConnect　=　true;

return　TRUE;

}

有必要提一下WSAAsyncSelect(),这里接收网络数据到达和断开的两个消息,我们收到WM_MYWINSOCK消息时将处理该消息并作为事件传送给调用者.

第二个参数，窗口句柄，我们传送了m_hWnd，这是因为MFC ActiveX也属于一个窗口，并且是可见的，因此可以成功。

　　编写WindowProc()，代码看起来如下：

双击代码全选

LRESULT　CMFCWinSockCtrl::WindowProc(UINT　message,　WPARAM　wParam,　LPARAM　lParam)　

{

//　TODO:　Add　your　specialized　code　here　and/or　call　the　base　class

switch(message)

{

case　WM_MYWINSOCK://响应自定义的消息

switch(WSAGETSELECTEVENT(lParam))

{

case　FD_READ://有新数据到达

FireRecvSockEvent();

break;

case　FD_CLOSE://对方已断掉当前连接

FireCloseWinsock();

break;

}

break;

default:

break;

}

return　COleControl::WindowProc(message,　wParam,　lParam);

}

　　本部分结束语:

　　好了,现在一个可以运行的控件已经完成，里面提供有Connect()和DisConnect()接口，和RecvSockEvent()及CloseWinsock()事件。以及WinSock的使用方法。

　　在下一部分(高级篇)将讲解两个重要接口SendData()和GetData(),下期内容如下:

　　long SendData(const VARIANT FAR& Data, const VARIANT FAR& DataType,const VARIANT FAR& DataLength, const VARIANT FAR& TimeOut)

　　long GetData(VARIANT FAR* Data, const VARIANT FAR& DataType, const VARIANT FAR& DataMaxLength, const VARIANT FAR& TimeOut)

　　VARIANT和SAFEARRAY的复杂用法。

　　控件开发出来后在VC和VB环境下的使用方法。

　　声明:

　　部分资料来源于网络，本文所用的所有源代码仅供非商业用途，并请保留原版权，否则后果自负！

　　欢迎大家拍砖，或指正不足的地方，一起探导更好的方法。

转载于:https://my.oschina.net/u/1469992/blog/275330

weixin_34075268

关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
0
评论
创建控件全过程

2019独角兽企业重金招聘Python工程师标准>>> ...
复制链接

扫一扫