[收藏]使用Windows系统提供的IP控件

天云上人

作者： ccrun ，如转载请保证本文档的完整性，并注明出处。
欢迎光临 C++ Builder 研究，http://www.ccrun.com/doc/go.asp?id=592
本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料：
标题：在Delphi中使用IP控件
作者：西安交通大学9649# 刘明华
8 s) K4 K+ v; D$ K在些对原作者的无私奉献表示感谢！如欲转载请保留完整版权信息。
# U. f3 {# W) {2 a4 D0 {' \. J如果这篇文章侵犯了您的版权，请来信告诉我们：info@ccrun.com
" s1 p) c2 i* L6 R; kccrun(老妖)(www.ccrun.com)  2003.10.29

5 s) M3 b3 _* Z  b在网络程序中，我们常常碰到需要用户输入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控件。
) t  @; u! Z3 k+ ^
% ^0 H9 e( ^- i- h8 f. z# v4 iWindows中有两个非常重要的动态联结库：commctrl.dll和comctl32.dll，它们是Windows的自定义控制库（Windows Common Controls）。自定义控制库中包含了许多常用的Windows控件，如Statusbar，Coolbar，HotKey等；在C++ Builder中，这些控件大多数都已被包装成可视化控件了。在Microsoft推出Internet Explorer 3之后，自定义控制库中新增了一些控件，其中就包括Windows的IP控件（IP Address edit control）。

/ Z+ t3 U% f! o●初始化Windows自定义控制库●
% ^9 S- A" S4 h* TWindows提供了两个API函数，InitCommonControls和InitCommonControlsEx，用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系：后者是前者的增强。如果你希望在程序中使用IP控件，你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下：
) H6 H7 Q7 X2 f: \/ r- W. z  s
" f' y7 j6 Z7 I# }3 ^typedef struct tagINITCOMMONCONTROLSEX {
    DWORD dwSize;             // size of this structure
# l3 Z3 ~4 u1 o) I2 {1 V    DWORD dwICC;              // flags indicating which classes to be initialized
& |3 u4 K* H6 o* d- K} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;

WINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);
' h# L' C9 @  E* R' q. Z' k7 B2 S
IP控件属于ICC_INTERNET_CLASSES类别的控件，如果要使用该控件，你应该在程序中包含如下的初始化代码：

TInitCommonControlsEx ICC;
5 Y  N5 `3 W; L6 @5 ?9 j3 q+ i! CICC.dwSize = sizeof(TInitCommonControlsEx);
ICC.dwICC  = ICC_INTERNET_CLASSES;
& p( ?- y1 _: Nif(!InitCommonControlsEx(&ICC))
    return;  //初始化组件失败

●创建IP控件●
6 P6 F" y) H5 i+ e9 PWindows 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);
) b& A$ l4 Z) @+ F8 O* U% m
●使用IP控件●
* X+ k  a- V4 {# x在程序中，我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个，这些消息及它们的含义见下表：
8 d2 Y0 o  ~/ q0 Y
* H4 _6 y0 l* k4 h' }% D消息常量            消息值         作用                                      参数及返回值
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指明哪个部分获取焦点
; e& |: x  y0 W9 j) q6 `- VIPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值：若为空，返回非0；不为空，返回0

& V6 b8 s1 ?$ ?2 V★㈠清空IP串（IPM_CLEARADDRESS）★
8 B/ v, w4 N5 |% ?' P0 ~$ FSendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);
# Y4 V; z/ Z/ L2 Z6 ]1 n& I- z
/ K' p" M* n% Q8 E3 N" c★㈡设置IP串（IPM_SETADDRESS）★
  x7 F1 m2 j) i0 |' v5 J' I  ]int nIP;
! N5 P9 X  A" M' n0 YnIP=MAKEIPADDRESS(192,168,0,1);
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);

6 v+ D/ ?+ s1 L& g" \此例将IP控件的内容设为"192.168.0.1"，其中MAKEIPADDRESS是一个Win32宏，定义在commctrl.h头文件中，它用来合成一个32位的IP值：
! v# J0 i+ j/ f; M( Z: I9 w8 B. v/ n#define MAKEIPADDRESS(b1,b2,b3,b4)
((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
; u+ P/ [* B  o4 ]+ `4 v: [
★㈢获取IP值（IPM_GETADDRESS）★
2 B" ]0 X7 k$ p( J3 S7 t: fint nIP;
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));
: R% p( X& Y+ f! @4 l) `  g//nIP++;
//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。
) U% q) d& L' g% ^6 p
若想要获取IP控件中IP串所对应的IP值，你应该向IP控件发送IPM_GETADDRESS消息，并且需要把一个32位整数的地址作为SendMessage的最后一个参数。
0 X& T( o2 D, X
★㈣设置取值范围（IPM_SETRANGE）★
; N8 M: U* \- n& O2 cSendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);
& Q1 b2 r- L( J) Q) ?' [" ?8 w此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中，Wparam指明要设置的字段， 而lparam的低16位字为该字段的范围：高字节为上限，低字节为下限。
) P- D! x" u7 \) l' E; I
★㈤设置输入焦点（IPM_SETFOCUS）★
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);
//将输入焦点设在IP控件的第四部分。
! Y# A/ p# @3 Q/ N/ E
* H" u. Z0 D2 L6 z: \㈥判断IP串是否为空（IPM_ISBLANK）
; G( l1 k/ |# L2 B; W# aif(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
: ]6 f7 O7 G  n* F5 }0 v# x: c{
9 c# r8 m' D9 D' _' H5 @    //IP控件中的IP串为空
}
( Z) k1 X; ]3 P2 ?- p- Q, u( Xelse
, k9 @; }. {$ L# v" ^& V5 I{
    //IP控件中的IP串至少有一部分不是空的
5 k+ E$ F5 ^  i) s. ?5 ]7 n}

●IP控件的通知消息●
! c- D$ I. o/ w9 a  w" J4 j当IP串被改动后或者输入焦点发生了转移，IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下，我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例：
/ Y; Q/ U% i6 Y: H5 J
/ d+ g* g4 _/ C& o) tvoid __fastcall TForm1::WndProc(TMessage &Msg)
) e7 E; M: T2 S+ i- J( E{
5 a- t$ q" Y0 y9 r( D+ @! ~    LPNMHDR p=(LPNMHDR)Msg.LParam;
9 C( B" N% K" c; Q0 q    if(Msg.Msg==WM_NOTIFY)
    {
) Z6 H  o! B+ Y% |# e        if(p->code==IPN_FIELDCHANGED)
        {
            //处理IP控件的IPN_FIELDCHANGED通知消息
        }
! Z% I' f7 x/ w  s& r( @8 Q$ V    }
+ \4 u+ G6 m* K9 z+ O    TForm::WndProc(Msg);
}