找回密码
 注册
搜索
查看: 4086|回复: 0

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

[复制链接]
发表于 2004-2-15 13:39:03 | 显示全部楼层 |阅读模式
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。; E: y  M! H5 k
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592
% P8 k$ _0 l; E6 f* ?  p本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:
" H; f6 H9 Q0 b7 L# M& p+ z标题:在Delphi中使用IP控件! Q0 F  N3 B9 f' F( F; R; h
作者:西安交通大学9649# 刘明华
. a  ~% d% x+ }在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。9 s/ y* A  O5 L9 m! h0 H( }
如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com( ^1 ?0 A( j( q! U# e
ccrun(老妖)(www.ccrun.com)  2003.10.29- g4 d9 X% l9 T( r

) h/ `( R9 ?0 ~- D5 ?8 P; t在网络程序中,我们常常碰到需要用户输入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控件。: [2 w$ B" [! l' D

9 S; G: g7 ^) O! L9 p4 K  vWindows中有两个非常重要的动态联结库:commctrl.dll和comctl32.dll,它们是Windows的自定义控制库(Windows Common Controls)。自定义控制库中包含了许多常用的Windows控件,如Statusbar,Coolbar,HotKey等;在C++ Builder中,这些控件大多数都已被包装成可视化控件了。在Microsoft推出Internet Explorer 3之后,自定义控制库中新增了一些控件,其中就包括Windows的IP控件(IP Address edit control)。
4 [  o- x" x# ?
1 n5 q) I4 I( L5 D" v: _3 b●初始化Windows自定义控制库●
, H% E- R/ I8 y* [1 y9 g2 z) z' `Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:5 Q  O/ X& i* r
) Z3 f4 O; @1 g. W3 `6 D
typedef struct tagINITCOMMONCONTROLSEX {, C6 k3 I/ U2 [) Q% z" K' u* {
    DWORD dwSize;             // size of this structure
3 f6 @/ t, v3 D4 w5 N. u    DWORD dwICC;              // flags indicating which classes to be initialized  }6 c  V$ N8 z$ s; [
} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;
  @. Y/ P3 u, ^/ a0 \5 I2 _, V6 ?( D
WINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);+ ^; r) h8 i7 @- r/ A  W. V) N; D
7 W6 ?* f+ B! t! \( D
IP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:" j- p0 }9 t" r2 N

& n) O, l! W" ^+ e1 ^: H& W: N5 JTInitCommonControlsEx ICC;
! D3 C  S; N; L4 I: i% LICC.dwSize = sizeof(TInitCommonControlsEx);
9 h" }' ~; w. k& B1 kICC.dwICC  = ICC_INTERNET_CLASSES;
: l; k. n# e) ~1 t$ r: |' Cif(!InitCommonControlsEx(&ICC))$ z) U6 M1 O. c$ R
    return;  //初始化组件失败
! c1 }- F5 s# N6 m; x. ^) ^7 x$ G+ T# O. W" q; D
●创建IP控件●
% i# m! }1 R* f, E. x( S5 _6 c5 FWindows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。( j2 h' f& j) ~- P1 h5 t* [
9 E9 P9 {$ y" m+ J& \- m, d! \% P, [
HWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);' \8 j( ]# P1 \3 }1 y8 Q

3 U9 M, b6 f5 U: o* Y) Y●使用IP控件●
  L! {- t! X" b; n: e4 n+ ^在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:
1 Z# Z4 u+ D- D* X1 O% S) r' m3 V& H+ E9 S- E# N
消息常量            消息值         作用                                      参数及返回值: G) |  q; \4 K; d( a9 L4 v' Y
IPM_CLEARADDRESS    WM_USER+100    清除IP控件中的IP串                        参数无7 d! w' N. G9 v' ^
IPM_SETADDRESS      WM_USER+101    设置IP控件的IP串                          Lparam为32位的IP值
0 L6 ~6 A& U  G+ q* s9 i, c* P" iIPM_GETADDRESS      WM_USER+102    获取IP控件中的IP串所对应的IP值(32位整数)  Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。  ' x3 T! f4 Q: b$ Y# O& G
IPM_SETRANGE        WM_USER+103    设置IP控件4个部分的其中一个的IP取值范围   Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
7 I8 q0 Z  ]9 H4 B& F9 Y' P& l7 C6 [0 xIPM_SETFOCUS        WM_USER+104    设输入焦点                                Wparam指明哪个部分获取焦点
7 \8 N7 c. [1 e( C$ w& }+ D" HIPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值:若为空,返回非0;不为空,返回0" H# `- J  ]1 ^% n& m

6 u) R: R& y3 E9 U★㈠清空IP串(IPM_CLEARADDRESS)★
) o1 ]. Q: o4 X1 vSendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);% |# k! X  M. i$ s
( I1 n1 |0 O- ]- v$ }5 X- l2 G4 X8 N
★㈡设置IP串(IPM_SETADDRESS)★
3 K9 H! f' W+ Aint nIP;' j* J! n8 X: ~) p2 p
nIP=MAKEIPADDRESS(192,168,0,1);
$ C. J9 R5 h# L2 b5 ~  t  Y6 dSendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);
8 R4 x! Y3 Z8 ?; A7 e$ r. U! T% l4 I: M4 z7 l( A2 D' e
此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:
: `$ {- w  n$ l2 I9 ]. K6 o" n#define MAKEIPADDRESS(b1,b2,b3,b4)2 g' |6 k& Z" F$ u+ P8 R
((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
5 l- X' U9 o9 C' b
  C# }' o* K5 q6 P6 o* e9 `! W+ G; i, S★㈢获取IP值(IPM_GETADDRESS)★' U7 E3 d) @) s/ u+ A5 B6 q8 l
int nIP;+ Q0 v: X+ b  _& F+ @2 ^) I
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));5 U) |$ M% ?' [. d$ H2 ~3 D
//nIP++;
4 a# r; ?( a6 X" e  K; e//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。8 C' X9 y7 B/ ^# F2 V' r

$ W  q% F1 K; l3 c0 t$ Q3 y$ G若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。
* _; g4 G6 j* l! q# f% e% Y6 p4 |- @. Z' n- F
★㈣设置取值范围(IPM_SETRANGE)★
/ a) x1 p+ y* A' `4 }SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);
3 X  A+ ~' P% ^8 v$ a- W$ @' z: ?$ k此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
7 ~$ W+ X1 ?+ _
* t2 ^' E- ~# o* p$ p4 }4 Q★㈤设置输入焦点(IPM_SETFOCUS)★! d4 k+ |) h1 a1 i+ y  {: Q
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);
% n$ ?9 o, V0 r, M//将输入焦点设在IP控件的第四部分。# ~4 B( ^, C' H" }. N- J

7 V) V5 R4 D- F  F6 c* E/ g, s㈥判断IP串是否为空(IPM_ISBLANK)
5 Y; m) {4 |. Z! }if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
3 y  w% I: [, r# A  @2 R2 [6 m{( _  I8 [* ]9 T! K, V7 ^
    //IP控件中的IP串为空& i: o& ?1 l9 {& x; [
}
/ o' P8 y- V/ P, ~  welse0 r0 P& C9 ]( v& R3 \( K. j# }
{
5 a+ C- V) G: V1 S    //IP控件中的IP串至少有一部分不是空的8 i: P+ V' N4 m5 H
}
. I+ P$ U2 @# {5 I; a/ _1 I$ J; `% f7 v! O7 G% Q1 j8 D+ W
●IP控件的通知消息●9 Y( b5 e' K0 I" u8 R( H& F
当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:& x: ^$ i. W8 n# V# a
2 T  }8 C3 O& }2 N  o
void __fastcall TForm1::WndProc(TMessage &Msg)
1 Y; L* A: j' e{
+ Q! [8 J( s* W    LPNMHDR p=(LPNMHDR)Msg.LParam;/ i' A1 M/ g/ N4 _4 E9 }1 s
    if(Msg.Msg==WM_NOTIFY)
3 E+ e1 X3 o# n" e* j$ y- T    {- b  S8 `' Z. Q( Y
        if(p->code==IPN_FIELDCHANGED)! a1 z8 _8 z/ w0 v; V: ^
        {! n7 e1 f6 ]* T% I5 Y% J
            //处理IP控件的IPN_FIELDCHANGED通知消息) ~; a0 N4 U7 g. W4 O+ R. w
        }
& y  `2 e  c% I# a9 ^- u    }4 Y3 ]/ l+ u1 u: j; a
    TForm::WndProc(Msg);
# ]7 P7 g) T0 J3 V0 w" y6 o}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|宁德市腾云网络科技有限公司 ( 闽ICP备2022007940号-5|闽公网安备 35092202000206号 )

GMT+8, 2026-5-2 12:16 , Processed in 0.019840 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表