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

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

[复制链接]
发表于 2004-2-15 13:39:03 | 显示全部楼层 |阅读模式
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。3 x+ _9 A# g4 y
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592
& V9 V& p) @$ S5 y' R- T3 a本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:! g7 T# |! F' e, d. A+ G
标题:在Delphi中使用IP控件% S8 Y$ Z; x  ?' G) T8 @+ a3 G
作者:西安交通大学9649# 刘明华
9 N6 I& b! S7 ?- e. t+ E在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。
9 C3 r7 T3 |$ D" G( T) D9 o  P' c' d如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com; e: {$ U7 h' K/ }' f6 D) d, Z9 w
ccrun(老妖)(www.ccrun.com)  2003.10.29
- V/ D- @5 ^6 {" x3 j2 _
3 C3 r$ D- E* C% V  u# P+ n在网络程序中,我们常常碰到需要用户输入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控件。9 d7 K; i  r5 e$ l2 T
( v4 }4 U; c& Y; z8 p% y7 A
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)。
; C! C' |! r1 _, G0 \8 n3 v* r
●初始化Windows自定义控制库●% ~0 Z. d3 f& Y0 H- b/ p4 ^
Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:' k* U% B5 {& J0 F3 _4 j
9 I5 \5 r/ X) v1 ~# N
typedef struct tagINITCOMMONCONTROLSEX {4 X! Y9 @% q9 u- m/ \/ H: r
    DWORD dwSize;             // size of this structure( P7 T" b5 s. w
    DWORD dwICC;              // flags indicating which classes to be initialized
: t" w6 u" l6 Q7 r. T} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;
) r- B- N$ Q4 u6 H% d1 K* ^; e$ A
# l0 _- l% `0 ~' l! S+ ZWINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);( s  C/ g1 @) h2 O1 g" ^

. H0 {* `* S  F) p, Z# g0 JIP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:% y  e/ R$ \/ C2 l! [

; B# ]* T1 R, a9 L% H7 x* M! HTInitCommonControlsEx ICC;
) U5 Y# y# e7 y' A, Y- uICC.dwSize = sizeof(TInitCommonControlsEx);
/ c! @& H! ?/ o! N! @! ~7 NICC.dwICC  = ICC_INTERNET_CLASSES;
: Y; [  [( m+ m/ |' @7 Xif(!InitCommonControlsEx(&ICC))# d2 T+ Q. ]# u- s& K: [8 ]+ r
    return;  //初始化组件失败5 N& z+ g* l. Y3 q9 b) q' l

: o- }$ R" Y; X  d. r●创建IP控件●
6 u6 z: o: t2 |Windows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。+ T) _* w6 Q+ k2 a) a6 R

3 D" i( g# _0 U+ o5 c/ wHWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);
5 s& N1 \8 v  v. X9 B  n6 I" N- W0 B8 S, x2 H  E+ d
●使用IP控件●6 ~0 B/ }1 g( _7 }
在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:
/ j. Z+ x1 Y* S8 B# w! y3 d  ]) I, }( R9 }
消息常量            消息值         作用                                      参数及返回值2 M; M2 i+ A) l0 N& `  Q: x
IPM_CLEARADDRESS    WM_USER+100    清除IP控件中的IP串                        参数无! @1 p0 n6 V4 P
IPM_SETADDRESS      WM_USER+101    设置IP控件的IP串                          Lparam为32位的IP值2 ]  F2 W3 X8 m* P1 ?
IPM_GETADDRESS      WM_USER+102    获取IP控件中的IP串所对应的IP值(32位整数)  Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。  
4 n$ T3 A0 ^; }2 w4 xIPM_SETRANGE        WM_USER+103    设置IP控件4个部分的其中一个的IP取值范围   Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
; A, R- Y& h6 r# l9 aIPM_SETFOCUS        WM_USER+104    设输入焦点                                Wparam指明哪个部分获取焦点5 A" r9 U0 {% ?. Z
IPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值:若为空,返回非0;不为空,返回06 O  m3 E4 G( M5 y1 A/ y/ `
& @9 ~' @5 O* Y
★㈠清空IP串(IPM_CLEARADDRESS)★
; s! [. L6 F% C3 b4 V' J5 H( mSendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);
, A6 N* K8 W( Q, {7 G2 W
: w$ b% ]8 c  K" }" u★㈡设置IP串(IPM_SETADDRESS)★
" I3 x) \. f8 P! g& Wint nIP;3 H3 J6 e2 g6 _: G& F7 S5 \
nIP=MAKEIPADDRESS(192,168,0,1); & a6 l& F: A6 [$ [
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);5 [( E3 T$ ?1 S  h

) X1 ^8 u  j, E3 m( h3 G+ ]: e此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:
8 ?0 [$ j/ i9 W#define MAKEIPADDRESS(b1,b2,b3,b4)8 S* S0 ^" i8 O! {! D
((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))% k6 Y) T0 n2 I( l) a1 i

6 e7 D; g2 a( _7 W- K* ]! r6 f★㈢获取IP值(IPM_GETADDRESS)★" I9 n- o8 l( ^: V, f
int nIP;2 M$ m1 V  W5 ?
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));9 {$ G, @  q1 y! l0 ~
//nIP++;
2 c! ^( U8 s+ i0 j( A3 \7 {. v/ j//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。
8 C7 T- _- I& X% j$ H
0 o1 ?6 Z! \1 @若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。
+ E0 Z4 h: k# R$ L
: I/ n0 a9 \5 z! C) |% C7 G★㈣设置取值范围(IPM_SETRANGE)★
* D8 J5 h' N& w5 H3 g' }4 h; K6 E' wSendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);
# U. E2 {' @3 w5 g* X此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
* z; f! m5 i* q8 h$ Q% u- Q2 x+ ~, i  D( i& ^2 l( o* I
★㈤设置输入焦点(IPM_SETFOCUS)★# M( \) W; y( n$ v) ~: }
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);3 j( T: y& T/ T
//将输入焦点设在IP控件的第四部分。
# V9 Q; ?: n+ T' @/ k' k1 V2 N
4 ]# G# P% s6 J- W㈥判断IP串是否为空(IPM_ISBLANK)
7 Q6 b" m4 _6 A$ q3 Eif(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
: f& W. P6 s0 F( [: n{
$ l: \( w* _$ D5 {" N) `    //IP控件中的IP串为空! g0 K' `- G" ?( g4 N
}
" x" P$ z4 _% E% ielse, R  ^/ k2 |& N9 Q: u/ o
{' ]- m, _' K- R, r# g2 n
    //IP控件中的IP串至少有一部分不是空的
; P# a% j3 f- J) ~}. G6 h; w% P4 a5 W
6 M8 Y' \; m! \: M! M6 d2 v4 B
●IP控件的通知消息●) U- `$ \2 C* ]( y4 o
当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:
0 z2 I# }8 Z- ]$ u
% g5 V! c. d% g' ovoid __fastcall TForm1::WndProc(TMessage &Msg)* j# p; j  v) U6 r, r" B8 }
{- j7 i1 x& z+ c8 |
    LPNMHDR p=(LPNMHDR)Msg.LParam;
' `* {% C' R6 p9 E$ n& X    if(Msg.Msg==WM_NOTIFY)$ l; h+ o- v! k! K5 q
    {
+ i% h& r$ x- p5 {        if(p->code==IPN_FIELDCHANGED)
4 x+ B! |9 z' @9 |  O- I        {
" p0 G% u  N- x7 \            //处理IP控件的IPN_FIELDCHANGED通知消息
( J( \; e+ w8 u# w        }
+ u6 P! k" T& J5 V    }
& B4 }0 F6 p/ Q; k5 U2 p0 i    TForm::WndProc(Msg);) h' b* F, a- g( G# X
}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-5-5 10:26 , Processed in 0.014754 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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