标准MFC WinSock ActiveX控件开发实例

最新推荐文章于 2018-06-26 10:45:19 发布

转载最新推荐文章于 2018-06-26 10:45:19 发布 · 771 阅读

本文详细介绍了使用MFCActiveX控件开发步骤，包括创建工程、架设Socket环境、提供控件接口和事件，以及编写基本代码实现连接功能。涵盖了从工程创建到接口实现的全过程，提供了具体的代码示例，帮助开发者理解和实践。

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.
   }