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

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

[复制链接]
发表于 2004-2-15 13:39:03 | 显示全部楼层 |阅读模式
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。/ U& J) Q- `! F- F  e7 Q
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592
) m$ j2 Q9 j$ [本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:4 [+ c* V& H5 Z- M, E: x; o
标题:在Delphi中使用IP控件
! h. {/ O* Q/ s& o作者:西安交通大学9649# 刘明华
4 c0 g9 |& V0 s3 P' h在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。! a. N" B5 P0 P# }# f* G
如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com9 W% i! s' a) \) y
ccrun(老妖)(www.ccrun.com)  2003.10.29
( X9 X, ~9 R$ B3 Q5 p! T: f. ?2 n6 c" i3 [9 W5 u
在网络程序中,我们常常碰到需要用户输入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控件。- M  Y( u' F7 J9 \5 X
8 l5 b' S1 s0 Q% r$ K, r
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)。; J; `- G+ T! q; c' R" ^" G
. f$ V  B! d5 S; [1 w% B
●初始化Windows自定义控制库●6 d/ j2 r' y+ {' ^+ _
Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:
2 p' m4 L: k& `& V& V- p% x$ O3 {# R4 X# Q) k) ~
typedef struct tagINITCOMMONCONTROLSEX {' @+ ]* L. X' q: u: Q( S
    DWORD dwSize;             // size of this structure, p/ k- |+ ?( i0 U' |5 ?& w
    DWORD dwICC;              // flags indicating which classes to be initialized% v! S$ ^- }4 V1 R+ v# Z! U
} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;" E2 U1 s% |; V& l* @' f
! t7 `& s" Z1 R9 L* n- m. G
WINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);. J7 l# J& Q# D9 m$ g

7 _6 \, `4 W- u- wIP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:8 R0 d9 y9 ^5 J7 a- O

4 i$ \& M# z9 L9 Q: Z7 fTInitCommonControlsEx ICC;
) s/ j6 x! B& ^0 q* q* UICC.dwSize = sizeof(TInitCommonControlsEx);
" a4 O4 I& e8 R: y/ P: o9 BICC.dwICC  = ICC_INTERNET_CLASSES;
. w, t: V' L' T1 t3 V7 Pif(!InitCommonControlsEx(&ICC))* B5 \) S' e: F' |) ^2 Q
    return;  //初始化组件失败. p% {! y1 J6 k/ r
$ |. s% L# V! r, @
●创建IP控件●5 r$ ?  X! ~* M7 _4 ]. z1 f# ?
Windows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
( w# I6 ]- G1 k( p/ R: k6 x. ?) M# S$ }2 ]2 Q; ?
HWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);' ^1 Y: }! g9 [) l

6 S/ V/ i0 o7 R/ B●使用IP控件●
! J9 g& T' O  B0 W* a. ?9 W5 ]/ R% \在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:
7 b0 s; J8 z) L1 [; Y* {6 `$ k9 p  B' q* r  x, [
消息常量            消息值         作用                                      参数及返回值
+ o3 S! L  W2 Y0 X* MIPM_CLEARADDRESS    WM_USER+100    清除IP控件中的IP串                        参数无
" i+ p$ v9 `. Q: }8 Z5 Q. m- wIPM_SETADDRESS      WM_USER+101    设置IP控件的IP串                          Lparam为32位的IP值
* m# ?, o0 i- d8 Q: y! }" JIPM_GETADDRESS      WM_USER+102    获取IP控件中的IP串所对应的IP值(32位整数)  Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。  
! C6 I8 E6 y9 A$ f" R6 ?3 eIPM_SETRANGE        WM_USER+103    设置IP控件4个部分的其中一个的IP取值范围   Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
: |" n. J, c8 k: e$ ?IPM_SETFOCUS        WM_USER+104    设输入焦点                                Wparam指明哪个部分获取焦点
9 d8 i0 v: K" t- pIPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值:若为空,返回非0;不为空,返回0! e2 h: F! A0 ?, V

; Z$ p; A3 i" Z- i6 U★㈠清空IP串(IPM_CLEARADDRESS)★
4 h5 [+ O  l0 @7 [SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);
) r2 |' ]1 q! n; I. z3 l7 {! V; k" A( e& j; I# H0 P6 ?
★㈡设置IP串(IPM_SETADDRESS)★
  j+ T- X  o2 N3 z6 x% iint nIP;% X& m/ f  q' ~6 h& `( F$ W! o
nIP=MAKEIPADDRESS(192,168,0,1); # P) A# l/ Z# u' B5 n" n
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);
* J+ U+ x3 V) A5 r) B0 n) Y  {4 }0 |5 o& ]% e* @+ H3 `& W6 Q
此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:7 @3 f1 g/ h' P4 T2 f8 j. x
#define MAKEIPADDRESS(b1,b2,b3,b4)
- u- q  d$ U0 h! M. D; @/ `((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
, Y9 u% Q0 X# U* i
' G1 D, U! T, X  H1 W★㈢获取IP值(IPM_GETADDRESS)★
$ G( b2 m3 Z5 g, @8 k) {& i  Lint nIP;9 b+ ?* H4 W- T
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));$ Y3 H9 `0 }. J
//nIP++;
  a  K: o( `  c3 @/ c//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。& B+ n0 [! \3 Y
" n" N7 w/ v9 N- K' p
若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。; T4 ^1 v& ~# W
% e" x: F" C6 k0 j$ Z
★㈣设置取值范围(IPM_SETRANGE)★
6 l/ A4 r' H, j0 j3 h! lSendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);3 }0 U9 _- b6 D. Q( A, N
此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
; \! U0 q) c  o! E3 D) Q; l# c  N" ]3 O
★㈤设置输入焦点(IPM_SETFOCUS)★, h' h- r, H( D& s# Y! z) l) E
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);! @5 }; J7 t7 x) W/ a+ v* `, o: E& T
//将输入焦点设在IP控件的第四部分。1 P! M# d  o8 {4 B; \

1 k% w) O* @; u4 [+ |8 V㈥判断IP串是否为空(IPM_ISBLANK)
/ ?+ H# f2 \8 ?8 zif(!SendMessage(hIpEdit,IPM_ISBLANK,0,0)) 0 ^" j6 h- M  S# r' d
{  l" ?: {% v( _9 Y" x" F) B
    //IP控件中的IP串为空
/ o' w" P( I, b  s3 F: }}
3 Y$ J% j$ E9 pelse6 {: k" i7 g& [8 A( j# u! x  O
{! A3 V+ F+ t& L0 r
    //IP控件中的IP串至少有一部分不是空的, }4 V, V+ E/ Z; q! _/ L) w6 D
}2 i5 X4 W. b8 |' [( T" N: D! I

/ Z6 U, r; P9 h3 z) z  o# U+ E) n; w●IP控件的通知消息●) @# }0 f( F& P, W( ?- i9 v
当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:
9 a' `0 l8 }1 u$ v' R& C" c+ X1 t+ N2 l: c  Q* w( l
void __fastcall TForm1::WndProc(TMessage &Msg)
6 R6 S' y$ y/ M- d{6 o- X1 B8 H$ i
    LPNMHDR p=(LPNMHDR)Msg.LParam;6 D/ G4 Z( z: y5 Z' a/ B
    if(Msg.Msg==WM_NOTIFY)6 E, z3 r( M6 |, k
    {
* l  ^1 o  a; a% f" w        if(p->code==IPN_FIELDCHANGED)7 G2 p) [) N6 F8 b: b# m8 F% u
        {+ R7 l" ]3 H. ~5 j* e/ G3 [  P
            //处理IP控件的IPN_FIELDCHANGED通知消息2 s3 B. h) G* C' P+ o& b5 D
        }1 Q* X/ _( {) _
    }7 g$ r9 \2 W/ \+ ]1 W  A
    TForm::WndProc(Msg);
! Q) X( }' q7 ]: I}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-6-20 00:49 , Processed in 0.036340 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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