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

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

[复制链接]
发表于 2004-2-15 13:39:03 | 显示全部楼层 |阅读模式
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。, P( J0 R$ y1 {5 W  I, a
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592
+ P" U1 Z3 M+ A" U1 s" \$ `5 |- \本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:
7 H) N9 B: o( Z4 C+ T- O' X6 W标题:在Delphi中使用IP控件6 N. H' Y' a3 w3 A# Z2 I
作者:西安交通大学9649# 刘明华! C/ z; U& |$ C7 o( Y9 d" U4 r0 \
在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。  T* j9 Z0 x* A5 t$ n9 Y7 x) _
如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com" {$ C+ E- I) F0 C
ccrun(老妖)(www.ccrun.com)  2003.10.29
$ w% N- |" l% ~
2 `! T) N3 l2 a7 \0 x3 ]在网络程序中,我们常常碰到需要用户输入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控件。% y- l, a- y' {, |

. Y# F7 n; s8 p# XWindows中有两个非常重要的动态联结库:commctrl.dll和comctl32.dll,它们是Windows的自定义控制库(Windows Common Controls)。自定义控制库中包含了许多常用的Windows控件,如Statusbar,Coolbar,HotKey等;在C++ Builder中,这些控件大多数都已被包装成可视化控件了。在Microsoft推出Internet Explorer 3之后,自定义控制库中新增了一些控件,其中就包括Windows的IP控件(IP Address edit control)。
. H1 ^! V3 X3 a1 h8 j7 l
/ ~) Z/ _  C: u4 ^2 d●初始化Windows自定义控制库●$ e! n% u& T( s6 h  t' }
Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:
1 M7 g4 R2 t! q0 g! y% E& V: s: N. t! Z7 ]' v8 }$ U4 ]& V6 ^
typedef struct tagINITCOMMONCONTROLSEX {4 \# i; p. a. ^: G* O6 ], K9 P
    DWORD dwSize;             // size of this structure; c, s! ~% J$ o1 i
    DWORD dwICC;              // flags indicating which classes to be initialized
2 f& G. _" h  ?1 }} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;" A% D6 L9 z8 }, E3 G" Y5 i0 ~+ i
. T$ `8 Y& u0 r) J8 o. u
WINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);$ c" I2 V7 M. Y
/ M; }8 d9 h( A  t8 P" G
IP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:
6 J& U" ]- q# b+ f% f/ ?  {1 e' a7 L) A6 E: r
TInitCommonControlsEx ICC;5 b  w7 ^- F! J- V
ICC.dwSize = sizeof(TInitCommonControlsEx);
6 R7 L; N+ ?( @& e. V4 G9 P" @( Y+ JICC.dwICC  = ICC_INTERNET_CLASSES;
: s, P$ H0 @1 l) I4 f& y4 H0 y) j- A; [if(!InitCommonControlsEx(&ICC))
" ~7 g# s2 f% r4 I# R- g2 F    return;  //初始化组件失败
: U( M  t" t% Z! R. B" @1 _! i* D& ]+ b$ e- {0 r: w
●创建IP控件●
0 Z- m' a# ^! L( W9 d% hWindows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
8 o% l; L& w5 E& G4 N
, X: v" ^! \- {" G; `# U5 D0 NHWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);  T. w( I2 C6 b2 P! c
3 j, f; t5 M7 O" q6 K5 K" p0 T! c  V
●使用IP控件●/ A. g/ d3 V$ @* e, F# w& ~: m
在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:9 j" H* j* r) p; d

: \; H8 m6 D  V  h消息常量            消息值         作用                                      参数及返回值
8 M3 F9 ]: j" K0 p. q% d& mIPM_CLEARADDRESS    WM_USER+100    清除IP控件中的IP串                        参数无
7 ]: X6 C+ D2 v4 V9 v$ {" VIPM_SETADDRESS      WM_USER+101    设置IP控件的IP串                          Lparam为32位的IP值6 Z5 C  L6 q! }- q# S% Y
IPM_GETADDRESS      WM_USER+102    获取IP控件中的IP串所对应的IP值(32位整数)  Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。  ( N6 C( I- d, f4 k0 P! `
IPM_SETRANGE        WM_USER+103    设置IP控件4个部分的其中一个的IP取值范围   Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。& v( X4 R0 l2 E1 a( O  D1 O- p
IPM_SETFOCUS        WM_USER+104    设输入焦点                                Wparam指明哪个部分获取焦点
# |9 a  o- \0 w1 h, S7 r6 {3 \IPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值:若为空,返回非0;不为空,返回0
; s) A2 L! b) A5 _& \
# }3 I$ S* @( E★㈠清空IP串(IPM_CLEARADDRESS)★; B4 ^* T: ^; Q, @
SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);
1 W' C; g' L4 s" _. L8 U2 }" t: J/ s6 H
★㈡设置IP串(IPM_SETADDRESS)★
, Q4 ~2 D6 J, b. \% n# uint nIP;+ S9 t" s5 ~. ]! E- |9 x
nIP=MAKEIPADDRESS(192,168,0,1);
# J9 G8 w6 H  {8 Z. {/ K! m  y+ j6 tSendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);  I0 X4 h1 ]9 m5 D  x5 @

4 Q) x2 t3 G5 v  |9 t此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:
: r8 {" X* t0 ^, Q/ Q# e5 ?#define MAKEIPADDRESS(b1,b2,b3,b4)
; l- t$ ], g# r. U% I- Q((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
: p! B  ]: G! \
8 r9 P* p, q; @4 l% B★㈢获取IP值(IPM_GETADDRESS)★9 `. [/ Q; l8 v# O
int nIP;
9 b) ^; m; l  jSendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));
$ y0 Y6 W( \" ^% T/ \/ F, L' A+ @; ]3 u//nIP++;
0 D+ S! l9 m' V- T& ~//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。5 S! z7 k" G2 ~2 e$ ^

& G" ]. F& M$ g. y$ X$ x1 t若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。& A1 C' ^- l2 ?0 d
+ b4 y. ?$ Q; L; U2 v2 M- X2 c
★㈣设置取值范围(IPM_SETRANGE)★
: g+ b5 l% y9 D  T+ KSendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);0 v3 l3 q/ u9 T' G
此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
& }9 ], X; J  @. n$ }) S. d7 D
, P1 ?) o3 I. Y, V★㈤设置输入焦点(IPM_SETFOCUS)★5 V% A4 T: z0 S
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);
$ B; ^8 l' j! O- }. S1 K% @//将输入焦点设在IP控件的第四部分。
2 f: m& m' x; U+ B7 s+ i. H: Y# l2 i) F% i
㈥判断IP串是否为空(IPM_ISBLANK)7 H( u6 R2 @6 W- T- ?! D
if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0)) ( O7 D; A2 Z# V
{+ U0 N) w* [8 Z8 A1 [, m
    //IP控件中的IP串为空
- v6 {0 D& q( [9 N3 U4 m}( J4 U* K; C( j$ h
else
: }3 J3 L* p6 I: c5 w8 ~2 x{
6 O. n2 e$ L& L. V7 O7 E# A    //IP控件中的IP串至少有一部分不是空的8 ]7 [' q$ w- b: }2 ~
}
  P. B1 ]/ k6 M' W; l$ _- F- _( S
●IP控件的通知消息●
' v) E2 A. ]  z. u* M当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:
0 u4 R7 }) ?$ q$ t& c: n" d
1 W! l( ]: ^) i9 p" P7 \  ]void __fastcall TForm1::WndProc(TMessage &Msg)
! ?  `( A5 f5 Z7 f* k7 E; O{
) s0 `) B, x' U# z# j/ u( ?% w    LPNMHDR p=(LPNMHDR)Msg.LParam;4 @' k; Q6 T3 L' Z0 G' ]
    if(Msg.Msg==WM_NOTIFY)5 C; V" q: ~) J9 V8 [8 }) O) E
    {- L$ o0 q. r* _0 X' w) m0 G+ H. }5 c
        if(p->code==IPN_FIELDCHANGED)( T8 X$ X0 z! A: C& ~$ [
        {
2 h# v1 l+ W% x0 E% z            //处理IP控件的IPN_FIELDCHANGED通知消息( P- x) h3 j: C5 F" n; m6 P1 n- Z
        }
9 {0 y: |# r/ y$ ^( V! J    }! d  x0 s# R! C6 P
    TForm::WndProc(Msg);1 {+ k) J" f, k& r
}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-6-19 20:53 , Processed in 0.040085 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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