|
|
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。6 E8 x: @8 Y$ d$ g; N; L8 {% N- f
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=5929 C( m; g1 p6 i y Z' I$ k' c
本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:
" {1 o2 K7 [; ]. e+ w+ x5 s, P标题:在Delphi中使用IP控件5 N6 N f$ p5 ~* d0 o
作者:西安交通大学9649# 刘明华
) A) T; r( j# R& \: n在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。" V% _ `" b% S6 E- ?- Z$ ]6 k+ b9 g
如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com
+ Q8 |* d: b$ Y: tccrun(老妖)(www.ccrun.com) 2003.10.293 \4 D7 G+ |4 G8 q, R5 f' w
4 f! y5 R( a( |% L# K在网络程序中,我们常常碰到需要用户输入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控件。
3 Q& S" N* [1 Z: ?/ B/ K0 O% [9 l- \6 ~; p8 V0 |: p
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 R& k7 r% X8 C D2 h
' p5 r, t' K% ` g4 F9 b7 `# g. e; o●初始化Windows自定义控制库●* l. x$ o1 n& F& {3 H) y8 t8 v
Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:
8 t2 L R9 J" \: \; l; J. ~* E( j7 P, i& s
typedef struct tagINITCOMMONCONTROLSEX {
) B; F) }8 D* Y) W3 o DWORD dwSize; // size of this structure$ t1 g6 x+ A% {
DWORD dwICC; // flags indicating which classes to be initialized5 e3 f5 z- K8 x* z/ J
} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;; `3 |$ A! n& M E3 k' k
5 A- `0 O2 ^& JWINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);
; G$ T& W. J- t" ?3 ^# R" \% l+ |! i& [
IP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:: ?* ~! X* o, @) ?5 }' n
# ?6 |' r* p( V& {# C2 u- u, _$ I8 NTInitCommonControlsEx ICC;; F) q$ y$ ?5 o! s* c& ^
ICC.dwSize = sizeof(TInitCommonControlsEx);9 |4 ?( @) N) c5 i' f
ICC.dwICC = ICC_INTERNET_CLASSES;5 L! q4 Q+ Z, i% x- ~ k7 [* x
if(!InitCommonControlsEx(&ICC))
0 |; `# w' X7 l. c, j return; //初始化组件失败* ^* V1 H1 y) k+ g0 ^" ?. _
5 H0 R9 V& z- U5 z●创建IP控件●/ f. ^' I6 C/ t. F& {
Windows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
* l: i9 K+ ^: ?$ y7 g! Q) Z6 C- E. @2 |# W- Y* @- m: \6 m
HWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);
9 E3 B; M) j5 C+ Z. a
' x6 N, o( s3 E7 Y9 b& \●使用IP控件●
: m3 I" d$ S# x2 s$ ~在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:7 n3 l" ?% w0 _4 x3 u
H7 T: q$ Q& |" P, l: p0 e( z消息常量 消息值 作用 参数及返回值" _- [5 g$ v/ H& [
IPM_CLEARADDRESS WM_USER+100 清除IP控件中的IP串 参数无
8 H9 \6 W+ s3 h+ _0 rIPM_SETADDRESS WM_USER+101 设置IP控件的IP串 Lparam为32位的IP值
& c1 M/ U) H5 q+ r0 d! V7 Y/ A, MIPM_GETADDRESS WM_USER+102 获取IP控件中的IP串所对应的IP值(32位整数) Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。 & A& ~/ `% {# I: R
IPM_SETRANGE WM_USER+103 设置IP控件4个部分的其中一个的IP取值范围 Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。4 S5 c$ R* A; j; j
IPM_SETFOCUS WM_USER+104 设输入焦点 Wparam指明哪个部分获取焦点+ Z. E" V1 B* q* d5 z
IPM_ISBLANK WM_USER+105 IP串是否为空 参数无。返回值:若为空,返回非0;不为空,返回0 M% x0 I# T/ L! `/ A
$ X$ ~5 {; Z; D, m& v★㈠清空IP串(IPM_CLEARADDRESS)★
, O5 R* q$ _4 B6 y, f2 x. N, a* XSendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);% A4 Y$ R/ m8 w' r
' N) k4 S) C6 r1 }. q* ^! G
★㈡设置IP串(IPM_SETADDRESS)★* I- `$ _6 P" `! k( K; U6 g" O
int nIP;
3 A( B# H+ [; N+ p- F( a7 {& ynIP=MAKEIPADDRESS(192,168,0,1); $ W! r$ H; N6 X3 I1 r2 {" U4 D; B
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);1 M: X+ a9 O: s0 ?6 o5 c: X
- ]; T9 u; l& S' Q! G* u- \
此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:
9 A; `& ~) N Y8 B#define MAKEIPADDRESS(b1,b2,b3,b4) g* x0 t# q1 i4 O- y
((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
5 p; s, r; b$ y* e' C. @* D4 o. s
4 y! D* b1 F2 r( l' U) Y1 E/ T: m2 u★㈢获取IP值(IPM_GETADDRESS)★. l& ^2 S6 w- G; ~$ ?* x4 N
int nIP;$ P9 F, j8 j/ H; t+ }
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));2 r3 c1 o& A. K
//nIP++;8 I. t! y( c. v# m* J7 x
//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP); //将IP加1再赋给IP控件。, O9 l# c' S3 X H" }
1 y% ~" s5 U, @
若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。# U7 j3 o: `' n
* H; K5 a* w- l( Z! e: ]: K
★㈣设置取值范围(IPM_SETRANGE)★3 X6 r& d2 F2 e5 F' q/ i4 y
SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);" `* A& L3 e8 g4 B2 z
此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
+ Y0 ? e. ]6 a0 a- K0 W
9 y# D4 d( @1 o) h; w★㈤设置输入焦点(IPM_SETFOCUS)★
( R% U. Y& `+ A( k" z" LSendMessage(hIpEdit,IPM_SETFOCUS,3,0);$ c* {1 z7 d9 a% K
//将输入焦点设在IP控件的第四部分。! r, z& O: A, c4 ?- Z% \+ P
0 X. G- ^- ?* f* @; Q5 T
㈥判断IP串是否为空(IPM_ISBLANK)5 h" u( b) r+ I0 g7 F
if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0)) * Y# O8 _7 B% L. e
{8 D, D9 ^8 ~* _
//IP控件中的IP串为空
% m/ S: i" ~, D4 x4 _* O5 j: \ [}; z0 m$ v; x& o) A
else+ j, c, `$ [8 m
{
+ L) T. O% d6 m3 T3 p! Z. M //IP控件中的IP串至少有一部分不是空的
3 C) k% L0 J; N" j8 F}
% D# _/ M& }( G; m. k
/ w, H. v+ u. E4 y3 Z4 q" O●IP控件的通知消息●
3 O! m; m) X- o* r0 L当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:
- p! l b& ]' L% ^. U t3 ~0 @1 @# L! V3 y0 `$ Z
void __fastcall TForm1::WndProc(TMessage &Msg)1 h+ t. E9 D; y2 T3 C# ]
{
4 `' @; `9 n* r* v# ?4 M% e LPNMHDR p=(LPNMHDR)Msg.LParam;2 _) l& |* a' W1 O6 n
if(Msg.Msg==WM_NOTIFY) n% @& m3 _8 p+ M
{ v7 a/ F4 H. R4 G) j/ m
if(p->code==IPN_FIELDCHANGED)- u! }& V% V* c$ L% r$ ~
{4 n3 v- O ~ ?# N: I) Y
//处理IP控件的IPN_FIELDCHANGED通知消息4 N Q5 L0 H. }* a% {
}
6 P9 t' H, \' e2 V" n, }6 t* T }
R8 J5 i7 p9 J4 I TForm::WndProc(Msg);6 X% D; Z8 ^' S
} |
|