使用Windows系统提供的IP控件

本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料：
标题：在Delphi中使用IP控件
作者：西安交通大学9649# 刘明华
在些对原作者的无私奉献表示感谢！如欲转载请保留完整版权信息。
假如这篇文章侵犯了您的版权，请来信告诉我们：info@ccrun.com
ccrun(老妖)(www.ccrun.com) 2003.10.29

在网络程式中，我们常常碰到需要用户输入IP地址的情况。然而C Builder并没有为我们提供能够用于输入IP串的控件，于是我们只好用TEdit控件（单行文本框）来接受用户输入的IP串。但是，使用TEdit来输入IP串并不是个好的主意，因为处理起来很不方便。事实上，在我们的身旁有一个专门用来输入IP串的Windows控件，就象网络链接属性中， Internet 协议 (TCP/IP) 属性中输入IP的控件。IP控件会拒绝非法的IP串（在每个部分只能输入0~255之间的数字）；他让您能够轻松地获取控件中的IP串所对应的IP值（32位整数），这省去了IP串和IP值之间相互转换的麻烦；此外，您还能限制IP控件中所能输入的IP的范围。在本文中，我将向大家介绍如何在我们的C Builder程式中使用Windows的IP控件。

Windows中有两个很重要的动态联结库：commctrl.dll和comctl32.dll，他们是Windows的自定义控制库（Windows Common Controls）。自定义控制库中包含了许多常用的Windows控件，如Statusbar，Coolbar，HotKey等；在C Builder中，这些控件大多数都已被包装成可视化控件了。在Microsoft推出Internet Explorer 3之后，自定义控制库中新增了一些控件，其中就包括Windows的IP控件（IP Address edit control）。

●初始化Windows自定义控制库●
Windows提供了两个API函数，InitCommonControls和InitCommonControlsEx，用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系：后者是前者的增强。假如您希望在程式中使用IP控件，您必须用InitCommonControlsEx来完成对自定义控制库连同类的初始化。函数InitCommonControlsEx的原型如下：

typedef struct tagINITCOMMONCONTROLSEX {
DWORD dwSize; // size of this structure
DWORD dwICC; // flags indicating which classes to be initialized
} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;

WINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);

IP控件属于ICC_INTERNET_CLASSES类别的控件，假如要使用该控件，您应该在程式中包含如下的初始化代码：

TInitCommonControlsEx ICC;
ICC.dwSize = sizeof(TInitCommonControlsEx);
ICC.dwICC = ICC_INTERNET_CLASSES;
if(!InitCommonControlsEx(&ICC))
return; //初始化组件失败

●创建IP控件●
Windows API函数CreateWindow或CreateWindowEx都能够用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。

HWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);

●使用IP控件●
在程式中，我们通过向IP控件发送消息来和他通讯。IP控件能够响应的消息有以下6个，这些消息及他们的含义见下表：

消息常量 消息值 作用 参数及返回值
IPM_CLEARADDRESS WM_USER 100 清除IP控件中的IP串 参数无
IPM_SETADDRESS WM_USER 101 配置IP控件的IP串 Lparam为32位的IP值
IPM_GETADDRESS WM_USER 102 获取IP控件中的IP串所对应的IP值(32位整数) Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目；获取到的IP值存放在lparam 所指向的Integer变量中。
IPM_SETRANGE WM_USER 103 配置IP控件4个部分的其中一个的IP取值范围 Wparam指明要配置取值范围的部分；lparam的低16位字为该字段的范围：高字节为上限，低字节为下限。
IPM_SETFOCUS WM_USER 104 设输入焦点 Wparam指明哪个部分获取焦点
IPM_ISBLANK WM_USER 105 IP串是否为空 参数无。返回值：若为空，返回非0；不为空，返回0

★㈠清空IP串（IPM_CLEARADDRESS）★
SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);

★㈡配置IP串（IPM_SETADDRESS）★
int nIP;
nIP=MAKEIPADDRESS(192,168,0,1);
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);

此例将IP控件的内容设为"192.168.0.1"，其中MAKEIPADDRESS是个Win32宏，定义在commctrl.h头文档中，他用来合成一个32位的IP值：
#define MAKEIPADDRESS(b1,b2,b3,b4)
((LPARAM)(((DWORD)(b1)<<24) ((DWORD)(b2)<<16) ((DWORD)(b3)<<8) ((DWORD)(b4))))

★㈢获取IP值（IPM_GETADDRESS）★
int nIP;
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));
//nIP ;
//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP); //将IP加1再赋给IP控件。

若想要获取IP控件中IP串所对应的IP值，您应该向IP控件发送IPM_GETADDRESS消息，并且需要把一个32位整数的地址作为SendMessage的最后一个参数。

★㈣配置取值范围（IPM_SETRANGE）★
SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);
此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中，Wparam指明要配置的字段， 而lparam的低16位字为该字段的范围：高字节为上限，低字节为下限。

★㈤配置输入焦点（IPM_SETFOCUS）★
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);
//将输入焦点设在IP控件的第四部分。

㈥判断IP串是否为空（IPM_ISBLANK）
if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
{
//IP控件中的IP串为空
}
else
{
//IP控件中的IP串至少有一部分不是空的
}

●IP控件的通知消息●
当IP串被改变后或输入焦点发生了转移，IP控件就会向他的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下，我们都能够忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例：

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有