标准MFC WinSock ActiveX控件开发实例

http://www.vckbase.com/index.php/wv/1577


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

1.New->Projects->MFC ActiveX ControlWizard,然后输入MFCWinSock工程名。如下图:

图一 创建工程

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

图二 创建完成

二、架设Socket环境:

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

1. #include < afxsock.h >        // MFC socket extensions

2.打开MFCWinSock.cpp文件,添加代码,看起来如下:

01. //
02. // CMFCWinSockApp::InitInstance - DLL initialization
03.  
04. BOOL CMFCWinSockApp::InitInstance()
05. {
06. BOOL bInit = COleControlModule::InitInstance();
07.  
08. if (bInit)
09. {
10. // TODO: Add your own module initialization code here.
11. if (!AfxSocketInit())
12. {
13. AfxMessageBox("无法初始化Socket,请检查!");
14. return FALSE;
15. }
16. WSADATA wsaData;
17. WORD wVersion = MAKEWORD(1, 1);//设定为Winsock 1.1版
18. int errCode;       
19. errCode = WSAStartup(wVersion, &wsaData);//启动Socket服务
20. if (errCode)
21. {
22. AfxMessageBox("无法找到可以使用的 WSOCK32.DLL");
23. return FALSE;
24. }
25. }
26.  
27. return bInit;
28. }
29.  
30.  
31. ///
32. // CMFCWinSockApp::ExitInstance - DLL termination
33.  
34. int CMFCWinSockApp::ExitInstance()
35. {
36. // TODO: Add your own module termination code here.
37. WSACleanup();//结束网络服务
38. return COleControlModule::ExitInstance();
39. }
40.  

三,提供控件接口和事件

1.在MFCWinSockCtl.cpp加入如下代码:

1. #ifndef WM_MYWINSOCK
2. #define WM_MYWINSOCK WM_USER+1888
3. #endif
4.  

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

图三 创建接口

这个时候,我们为这个控件添加了一个Connect()的接口,出于通用性,安全性和扩展性的考虑,我们采用了VARIANT类型的参数,
很多人可能都不太了解该类型,又或者有接触过,但被吓怕了,那么我们来看清它的本来面目:

01. struct  tagVARIANT
02. {
03. union
04. {
05. struct  __tagVARIANT
06. {
07. VARTYPE vt;
08. WORD wReserved1;
09. WORD wReserved2;
10. WORD wReserved3;
11. union
12. {
13. LONG lVal;
14. BYTE bVal;
15. SHORT iVal;
16. FLOAT fltVal;
17. DOUBLE dblVal;
18. VARIANT_BOOL boolVal;
19. _VARIANT_BOOL bool;
20. SCODE scode;
21. CY cyVal;
22. DATE date;
23. BSTR bstrVal;
24. IUnknown __RPC_FAR *punkVal;
25. IDispatch __RPC_FAR *pdispVal;
26. SAFEARRAY __RPC_FAR *parray;
27. BYTE __RPC_FAR *pbVal;
28. SHORT __RPC_FAR *piVal;
29. LONG __RPC_FAR *plVal;
30. FLOAT __RPC_FAR *pfltVal;
31. DOUBLE __RPC_FAR *pdblVal;
32. VARIANT_BOOL __RPC_FAR *pboolVal;
33. _VARIANT_BOOL __RPC_FAR *pbool;
34. SCODE __RPC_FAR *pscode;
35. CY __RPC_FAR *pcyVal;
36. DATE __RPC_FAR *pdate;
37. BSTR __RPC_FAR *pbstrVal;
38. IUnknown __RPC_FAR *__RPC_FAR *ppunkVal;
39. IDispatch __RPC_FAR *__RPC_FAR *ppdispVal;
40. SAFEARRAY __RPC_FAR *__RPC_FAR *pparray;
41. VARIANT __RPC_FAR *pvarVal;
42. PVOID byref;
43. CHAR cVal;
44. USHORT uiVal;
45. ULONG ulVal;
46. INT intVal;
47. UINT uintVal;
48. DECIMAL __RPC_FAR *pdecVal;
49. CHAR __RPC_FAR *pcVal;
50. USHORT __RPC_FAR *puiVal;
51. ULONG __RPC_FAR *pulVal;
52. INT __RPC_FAR *pintVal;
53. UINT __RPC_FAR *puintVal;
54. struct  __tagBRECORD
55. {
56. PVOID pvRecord;
57. IRecordInfo __RPC_FAR *pRecInfo;
58. }   __VARIANT_NAME_4;
59. }   __VARIANT_NAME_3;
60. }   __VARIANT_NAME_2;
61. DECIMAL decVal;
62. }   __VARIANT_NAME_1;
63. };
64.  

它先是一个结构体,里面有一个重要成员VARTYPE vt;vt即是指明当前的数据类型,比如整型或者字符型,当指明vt后,后面看到各种变量类型包括在一个联合体当中,也就是说指明vt后,你只能使用对应的其中之一变量类型。看着这众多的各种不同类型变量集中在一起,确实让人吓了一跳,但细细看来,大多数变量跟我们平时的用法相似。值得一提的是SAFEARRAY __RPC_FAR *parray;也许有很多人还没有接触过SAFEARRAY类型的变量,SAFEARRAY实际上也是一个结构,大家可以参考MSDN,我也将在后面介绍它的具体使用方法。

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

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

图四 创建事件

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

图五 重载WindowProc()

四、编写代码

1.编写VariantToLong()转换函数,该函数代码如下:

01. //类型转换,将VARIANT类型转换成Long类型
02. long CMFCWinSockCtrl::VariantToLong(const VARIANT &var)
03. {
04. long r;
05. switch(var.vt)
06. {
07. case VT_UI2://USHORT
08. r = var.uiVal;
09. break;
10. case VT_UI4://ULONG
11. r = var.ulVal;
12. break;
13. case VT_INT://INT
14. r = var.intVal;
15. break;
16. case VT_UINT://UINT
17. r = var.uintVal;
18. break;
19. case VT_I4://LONG
20. r = var.lVal;
21. break;
22. case VT_UI1://BYTE
23. r = var.bVal;
24. break;
25. case VT_I2://SHORT
26. r = var.iVal;
27. break;
28. case VT_R4://FLOAT
29. r = (long)var.fltVal;
30. break;
31. case VT_R8://DOUBLE
32. r = (long)var.dblVal;
33. break;
34. default:
35. r = -1;//无法转换该值
36. break;
37. }
38. return r;
39. }

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

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

1. SOCKET OnlySock;//建立的唯一Socket,不允许重复建立多个
2. bool isOnlyConnect;//是否建立了连接

然后再编写Connect(),看起来如下:

01. BOOL CMFCWinSockCtrl::Connect(const VARIANT FAR& RemoteHost, constVARIANT FAR& RemotePort)
02. {
03. // TODO: Add your dispatch handler code here
04. if(isOnlyConnect)//该连接已建立,还没有断开
05. return FALSE;
06.  
07. CString IPAddress;
08. int Port;//转换成整型的端口
09.  
10. switch(RemoteHost.vt)
11. {
12. case VT_BSTR://字符串型
13. IPAddress = CString(RemoteHost.bstrVal);
14. break;
15. case VT_BYREF|VT_I1://CHAR *
16. IPAddress.Format("%s",RemoteHost.pcVal);//RemoteHost.pbstrVal);
17. break;
18. default:
19. IPAddress = "";
20. return FALSE;
21. }
22.  
23. Port = VariantToLong(RemotePort);//我们编写的一个VARIANT转换成long类型的函数
24. if(Port<=0)
25. return FALSE;
26.  
27. _TCHAR *ip = 0;
28. struct hostent *host = 0;
29. struct sockaddr_in addr;
30. ULONG dotIP = inet_addr(IPAddress);
31.  
32. OnlySock = socket(AF_INET, SOCK_STREAM, 0);
33.  
34. // 判断是否为点IP地址格式
35. if (OnlySock == INVALID_SOCKET)
36. {
37. shutdown(OnlySock, 0x02);
38. closesocket(OnlySock);//释放占有的SOCK资源
39. return FALSE;
40. }
41.  
42. memset(&addr, 0, sizeof(struct sockaddr_in));
43. // 设定 SOCKADDR_IN 结构的内容
44. // 如果通讯协议是选择IP Protocol,那此值固定为AF_INET
45. // AF_INET 与 PF_INET 这两个常量值相同
46. addr.sin_family = AF_INET;
47. addr.sin_port = htons(Port);
48. addr.sin_addr.S_un.S_addr = dotIP;
49. if (dotIP == INADDR_NONE)
50. {
51. host = gethostbyname(IPAddress);
52. if (!host)
53. {
54. shutdown(OnlySock, 0x02);
55. closesocket(OnlySock);//释放占有的SOCK资源
56. return FALSE;
57. };
58. ip = inet_ntoa(*(struct in_addr*)(*host->h_addr_list));
59. addr.sin_addr.S_un.S_addr = inet_addr(ip);
60. }
61.  
62. //开始连线
63. if (connect(OnlySock, (LPSOCKADDR)&addr, sizeof(SOCKADDR)))
64. {
65. shutdown(OnlySock, 0x02);
66. closesocket(OnlySock);//释放占有的SOCK资源
67. return FALSE;
68. }
69.  
70. int   iError = WSAAsyncSelect(OnlySock, m_hWnd,WM_MYWINSOCK, FD_READ|FD_CLOSE); //只对网络断开和数据到达通知感兴趣
71. if(iError == SOCKET_ERROR)//无法绑定Winsock的事件通知
72. {  
73. shutdown(OnlySock, 0x02);
74. closesocket(OnlySock);//释放占有的SOCK资源
75. return FALSE;
76.
77.  
78. isOnlyConnect = true;
79. return TRUE;
80. }

有必要提一下WSAAsyncSelect(),这里接收网络数据到达和断开的两个消息,我们收到WM_MYWINSOCK消息时将处理该消息并作为事件传送给调用者.
第二个参数,窗口句柄,我们传送了m_hWnd,这是因为MFC ActiveX也属于一个窗口,并且是可见的,因此可以成功。

3.编写WindowProc(),代码看起来如下:

01. LRESULT CMFCWinSockCtrl::WindowProc(UINT message, WPARAM wParam,LPARAM lParam)
02. {
03. // TODO: Add your specialized code here and/or call the base class
04. switch(message)
05. {
06. case WM_MYWINSOCK://响应自定义的消息
07. switch(WSAGETSELECTEVENT(lParam))
08. {
09. case FD_READ://有新数据到达
10. FireRecvSockEvent();
11. break;
12. case FD_CLOSE://对方已断掉当前连接
13. FireCloseWinsock();
14. break
15. }
16. break;
17. default:
18. break;
19. }
20. return COleControl::WindowProc(message, wParam, lParam);
21. }

本部分结束语:

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

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

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

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

3.VARIANT和SAFEARRAY的复杂用法。

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

声明:

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

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

3.欢迎访问www.vcfans.cn,感谢您的支持!













相关推荐
©️2020 CSDN 皮肤主题: 大白 设计师:CSDN官方博客 返回首页