|
|
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。0 U+ B+ m: _" w- F- Q
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592
2 F* a: q8 l* k6 O6 C本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:
3 K% V! e0 Q& F% s标题:在Delphi中使用IP控件
7 o z" i3 z/ q1 t% o9 _7 v; n) k作者:西安交通大学9649# 刘明华6 q! G3 \7 x O7 m- e
在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。% o ^; ]' N9 F3 P% F1 w
如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com% D1 `, f; T1 F1 g1 h/ ]
ccrun(老妖)(www.ccrun.com) 2003.10.29- b2 [9 W( C! r" @& _7 p
; b `$ x: H4 e8 L0 C3 ~. }+ X
在网络程序中,我们常常碰到需要用户输入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控件。
+ d; v" Z6 [( b+ e" @; V
1 l4 j# y3 y4 e3 w+ a4 H5 ^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)。7 n' {8 {5 j2 `0 [& n
# \" c) n9 [& i1 x
●初始化Windows自定义控制库●- U# R/ a4 N1 p( A
Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:
2 C0 e3 _, Q" @* P) `4 c5 z( [; z7 w' A" y0 d5 x+ R
typedef struct tagINITCOMMONCONTROLSEX {7 c& K1 g7 ?; A; `& W% @
DWORD dwSize; // size of this structure! k5 T! Z/ I8 P. D/ J; K2 p
DWORD dwICC; // flags indicating which classes to be initialized5 H) x8 K/ M. P! C$ A n5 h
} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;. x2 _, F9 Z# a, e0 v
; ?. B. ]# l% _% N* S
WINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);
0 D' X' L4 c% A, l
8 j: v0 u; c" Q* |IP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:/ g2 U, D0 }% S1 z) s, O
: \, m* z: R* l: A9 s
TInitCommonControlsEx ICC;
1 j9 [3 t* i- b! i6 o5 {8 _# \ICC.dwSize = sizeof(TInitCommonControlsEx);, v) C' T: ~ k# Y# i
ICC.dwICC = ICC_INTERNET_CLASSES;" d8 e: t: Q! R" _; V
if(!InitCommonControlsEx(&ICC))6 l2 y/ \: s5 z7 l& i+ k- F
return; //初始化组件失败# d+ P% M7 ^* {; N/ c N4 P& t
7 C% [. @2 G s. m
●创建IP控件●
9 H/ x5 A+ X$ T, s+ `! p6 |5 k# o `Windows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
) e# a; P5 o, Q' A$ }6 A+ \+ B( {
5 n$ ^1 `% I$ f" [. yHWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);6 o5 I) b3 E0 M: f: ?# w5 _
6 H& H0 L( g% f- c5 x) x1 ~●使用IP控件●& @8 p% y' O) b. b5 h( o
在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:
" M) J/ {8 o3 W* D' [/ M2 P) Y0 m) [7 [+ W7 P% d
消息常量 消息值 作用 参数及返回值
! ]" z4 h3 M b( J) a+ i4 `" w( P' `IPM_CLEARADDRESS WM_USER+100 清除IP控件中的IP串 参数无
6 h. f, c0 Q" u* x* i( T7 f, H; aIPM_SETADDRESS WM_USER+101 设置IP控件的IP串 Lparam为32位的IP值
) t$ P2 I" C0 \IPM_GETADDRESS WM_USER+102 获取IP控件中的IP串所对应的IP值(32位整数) Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。 6 `( y6 J9 m3 H& s( Y) B7 |
IPM_SETRANGE WM_USER+103 设置IP控件4个部分的其中一个的IP取值范围 Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
) [7 l; Z# ]; B) j& E) n1 ZIPM_SETFOCUS WM_USER+104 设输入焦点 Wparam指明哪个部分获取焦点
9 Q- f: U* `5 vIPM_ISBLANK WM_USER+105 IP串是否为空 参数无。返回值:若为空,返回非0;不为空,返回0$ {2 M, i, B4 s2 d' W" t
4 ?$ w6 S6 ] I# P
★㈠清空IP串(IPM_CLEARADDRESS)★5 c% F+ P9 b9 ]8 H) r/ v& u8 T, D, }6 P
SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);2 ]3 @1 b% ]) N' N
* J5 x; B2 S, J$ ]8 S0 T7 g★㈡设置IP串(IPM_SETADDRESS)★
& d V% C. t+ r+ ~. p/ ]0 f* p7 Jint nIP;* G1 X2 O( Y1 H
nIP=MAKEIPADDRESS(192,168,0,1); 9 Q' F3 I& H3 P+ t6 c
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);4 H. b' }3 [ C4 e# w
# R" e% Z5 U* i. @; M( R6 [
此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:
- |" z7 B$ i3 _/ V#define MAKEIPADDRESS(b1,b2,b3,b4)9 d2 A9 v) a2 y6 \" v
((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
) @' O" g" N& u& V& {
! h3 u; ]8 {9 P( J+ l1 Y% R★㈢获取IP值(IPM_GETADDRESS)★: r% S9 h9 W8 W
int nIP;
; Y0 S7 ?2 D- t3 V' I7 oSendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));
0 m' U+ m5 d# }$ Q//nIP++;
% J2 s5 W4 k" P1 r' z//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP); //将IP加1再赋给IP控件。# k# R# t, c& L$ c8 r6 L8 E& C
0 S( C- E2 v0 Q1 H" J' K
若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。5 ~4 w: z+ D- U; G
' Q* s9 _# H4 [2 O6 U
★㈣设置取值范围(IPM_SETRANGE)★
7 [' w% @" l1 g( w. J6 K6 @SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);
, y9 c# ]( w; @1 l( I此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。1 D* i5 ^- J) I2 t
/ m0 F; R3 @, j+ O) m/ @6 x
★㈤设置输入焦点(IPM_SETFOCUS)★
+ t3 g" n. v1 K! w; u: O4 tSendMessage(hIpEdit,IPM_SETFOCUS,3,0);
2 q" E7 t r) U3 F$ l8 [: M" y//将输入焦点设在IP控件的第四部分。
6 }# ?& [# q; O3 c1 ^
}" b ~" c z4 ~㈥判断IP串是否为空(IPM_ISBLANK)8 Q" z6 ^# z! Y% e& X
if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
6 A& n6 H$ H6 p$ X* f/ n{* c5 W8 ^+ _/ @: ^1 P: V
//IP控件中的IP串为空
+ p, P" U' x& @! [5 [6 C% ~. F}
% \2 B' N6 P- M* y# @else
: h, }- k5 L" A, t{# b8 d6 V3 j+ P/ o/ P
//IP控件中的IP串至少有一部分不是空的6 }: R" V! M3 J/ o2 G
}
0 U m) S" v5 w2 M7 t" k2 b& P. c* B2 P; l9 o/ ?$ Y9 ?. [" R
●IP控件的通知消息●1 e6 [# W" D- }
当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:
; j* ^+ A! w3 [9 I; B+ p$ w1 }" j% U1 i3 m v) ^+ ^
void __fastcall TForm1::WndProc(TMessage &Msg)
( ]# p( E) e( }{
; ~( Q/ r# a) F' S* c- F8 g LPNMHDR p=(LPNMHDR)Msg.LParam;
* D- C+ l9 Z) C, m& V5 f if(Msg.Msg==WM_NOTIFY)
# q$ \0 O5 Z1 V3 q8 k& ? {
- _8 y- [& Y( i$ G" ?: b if(p->code==IPN_FIELDCHANGED)
2 `/ J7 d; l \, A { |9 c, S" d2 z1 J2 C# o1 W& W
//处理IP控件的IPN_FIELDCHANGED通知消息' p2 G8 I# R# T: S
}
7 O' Q& o0 `$ E+ M: X1 R }' Z+ D3 S$ w* O. ]
TForm::WndProc(Msg);/ E3 T" W; @* V
} |
|