|
|
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。+ V8 u( X2 m' j! g' G: r/ Q4 c
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592
9 A( `, @. @( d: ]% l& @9 _本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:
# D- Z8 a F: z) s" H, q4 E标题:在Delphi中使用IP控件' N" p+ {( U" |7 Q* b
作者:西安交通大学9649# 刘明华' q- L" Y% S4 i3 T w1 n8 u4 a
在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。
& q, P/ P! u J6 g6 h$ j6 ^如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com A: D B9 K+ E! ]
ccrun(老妖)(www.ccrun.com) 2003.10.29
1 E" }( y# |) Y" q" p8 I
* a1 H+ a/ `- p4 X* y在网络程序中,我们常常碰到需要用户输入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控件。
% Z' c, q7 I5 n
" w" X4 U3 b9 \; tWindows中有两个非常重要的动态联结库:commctrl.dll和comctl32.dll,它们是Windows的自定义控制库(Windows Common Controls)。自定义控制库中包含了许多常用的Windows控件,如Statusbar,Coolbar,HotKey等;在C++ Builder中,这些控件大多数都已被包装成可视化控件了。在Microsoft推出Internet Explorer 3之后,自定义控制库中新增了一些控件,其中就包括Windows的IP控件(IP Address edit control)。1 {& h$ H9 Q8 j# ~1 s
7 f: u3 F! b8 t) x●初始化Windows自定义控制库●" q; ?- U+ y. t" `6 f' m Q+ e& b
Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:, d% B& t# U( C4 C9 z/ J% U8 R1 U
& _5 g+ ]! @' W: q9 gtypedef struct tagINITCOMMONCONTROLSEX { ]1 Y! Y6 \9 X
DWORD dwSize; // size of this structure. S r$ q6 F- o9 c% B; ^
DWORD dwICC; // flags indicating which classes to be initialized
& D+ @& F9 v* Z6 e% C} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;5 L+ D1 j# x9 Q
1 D* c% D0 g/ T) k5 O7 C9 ZWINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);
) @2 p1 S4 F: N4 ^: K: {) ~; Y; U" F& ?! T- L. ]- c
IP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:
. D0 A# n* n" Z7 g3 ]+ q% a# j' ^- l! I' m/ S/ r/ [4 l5 \/ N3 b: Z
TInitCommonControlsEx ICC;
0 ]% X, r% _0 g' _ICC.dwSize = sizeof(TInitCommonControlsEx);
0 j3 j; t2 O3 k' cICC.dwICC = ICC_INTERNET_CLASSES;
0 k8 k& _& G/ W! e2 c4 g% {1 i: kif(!InitCommonControlsEx(&ICC))+ N: y: O( D, p# Y
return; //初始化组件失败
3 n2 W) K% U, K! _' G- G$ Q; D' W9 `. Z: U* ]" G+ B
●创建IP控件●
9 j6 ?& ]7 H! j1 r+ D2 e) C) ?0 J8 r0 AWindows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
; ^. ~" Y& w/ e9 H- i
6 [0 S) h. q* g/ _. {HWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);6 V0 k7 Z3 F2 z7 Y: k9 B! l
& \- `% ?5 y' c! _) [8 \3 c6 X
●使用IP控件●1 J( ? i" k" }
在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:
$ c3 c* V; A; H% x6 f4 t( U
) J+ E9 Q4 m# E/ l( B" E7 @; K4 V; Z8 o消息常量 消息值 作用 参数及返回值' Q$ {" G, D* U% I. f' v
IPM_CLEARADDRESS WM_USER+100 清除IP控件中的IP串 参数无
6 ~& N% l9 k7 K! m; j RIPM_SETADDRESS WM_USER+101 设置IP控件的IP串 Lparam为32位的IP值& Z# w7 v1 \: `! q* W6 a
IPM_GETADDRESS WM_USER+102 获取IP控件中的IP串所对应的IP值(32位整数) Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。
3 `( e% m+ o( ^7 tIPM_SETRANGE WM_USER+103 设置IP控件4个部分的其中一个的IP取值范围 Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
; e) o- ~" _ I0 dIPM_SETFOCUS WM_USER+104 设输入焦点 Wparam指明哪个部分获取焦点% O- }; k. y( l% E5 a5 @! d8 E
IPM_ISBLANK WM_USER+105 IP串是否为空 参数无。返回值:若为空,返回非0;不为空,返回07 P" _ J, t7 _) \
, H7 t: w+ Y* _: C$ d6 e& Y! }
★㈠清空IP串(IPM_CLEARADDRESS)★! E8 E. n n& P8 e# c
SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);
' Z$ q9 K) H. i: u6 [
! ^4 a$ q, \8 y# m# _★㈡设置IP串(IPM_SETADDRESS)★
8 C$ ^- Y6 J/ c, Rint nIP;
2 [2 b/ r1 q j' w1 q% v8 Q0 PnIP=MAKEIPADDRESS(192,168,0,1); # ~! } }8 Q# `9 l' O9 O2 b
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);
) ]2 H7 }3 ]7 [: w8 g# x; L5 V/ ~- |# [/ J: H: J7 _$ p+ y
此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:5 X: z) t( j" \% Z a: v2 T
#define MAKEIPADDRESS(b1,b2,b3,b4)
$ T2 Z y: t0 F4 j8 a3 S b# y O0 J((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))6 \3 k% n5 k# J: Y
- t( Y6 |# `( T. z% B; N
★㈢获取IP值(IPM_GETADDRESS)★7 l6 Y/ Z- [" f5 @' W M& I
int nIP;+ p% D8 K$ }: W0 r4 g
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));
8 w$ Q7 t& a& g2 {& y# [//nIP++;
3 t* O V, n! y//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP); //将IP加1再赋给IP控件。/ @. x0 p+ g, f9 W
) U/ w# g3 f0 {' ?' a若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。
h2 g( B1 w% @. e8 A
9 q: ~$ `. M3 M* |8 `" k★㈣设置取值范围(IPM_SETRANGE)★7 g) ]8 @0 }4 g/ R4 Q+ h' ^8 G* Z
SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);6 u, e- d! o1 c; m
此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
* \6 |& W4 g" v$ |& b4 E- f2 B8 K) N* K% O$ \5 v# }2 f
★㈤设置输入焦点(IPM_SETFOCUS)★0 ?6 J5 M3 Z8 D# G5 s) m
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);
% w% R6 p" |5 r I//将输入焦点设在IP控件的第四部分。: o$ A6 l4 J1 H; j* M
6 y4 b7 f! \# Y; c; }( B4 |㈥判断IP串是否为空(IPM_ISBLANK)
5 T( D* s* h4 [* a. M/ ]$ E' ^if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
$ Z3 M( ]8 f- d/ f- n{- Y4 G) F* L3 X+ T% q# L
//IP控件中的IP串为空
! w' H) S- @% N0 h8 F% _- y}" R3 m; `" u8 A u7 N% R. U
else* v. F" b/ e0 w/ _) |! G# W g8 y/ |
{
6 ?- I4 D/ h; a. c //IP控件中的IP串至少有一部分不是空的2 h+ K: T7 S! L8 _* y9 @
}8 U4 ^7 ^- I+ T/ ~$ W% H
% s& ?0 v* V! w/ g4 n: b: q2 e4 [●IP控件的通知消息●
& N4 Z' [, J3 K8 Z# G& R当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:2 F* V2 S! d$ b* V
9 Z0 x- y( W& W% gvoid __fastcall TForm1::WndProc(TMessage &Msg)% u- D- B" E* v+ X p s7 y
{
5 P2 @% r) l, w! _+ S LPNMHDR p=(LPNMHDR)Msg.LParam;! N. h8 Y K) p: Z
if(Msg.Msg==WM_NOTIFY)
& ^1 u% P% U4 I0 ]6 c: G& i% } {
3 p1 i: H. O7 }5 s if(p->code==IPN_FIELDCHANGED)) a; `; U7 O0 Y5 Q* w4 M
{
4 Q0 x1 Y. f( ?! G/ c4 F0 p% x/ D //处理IP控件的IPN_FIELDCHANGED通知消息
' C& ~+ b) {# q6 p- b: c* p }4 X; a/ S' Z6 B J3 O2 L: R
}
r/ |( g: K/ V. u) t M3 N% J TForm::WndProc(Msg);
1 L% V4 M' [9 Y5 q# ?+ h0 g; m} |
|