|
|
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。( B) Y( W7 I2 Z7 Q5 Y
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592
# W6 n) X" @7 @" T ~: O本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:
2 \6 o; T6 E C' A7 e标题:在Delphi中使用IP控件
, v; ~1 |8 c0 w1 B1 ]2 |8 y作者:西安交通大学9649# 刘明华! z/ j- ~/ h8 I) N9 z
在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。) @3 I4 f1 x, S1 T8 b
如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com. \, V& {9 S" v9 }; i( N
ccrun(老妖)(www.ccrun.com) 2003.10.298 g! P2 I$ D7 R
3 t8 c8 ^% e S8 T在网络程序中,我们常常碰到需要用户输入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控件。
L" ^2 y+ o* H, n% X/ N$ O" y+ F# g; m
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)。3 \; C. f& f! v- b' y
2 ^4 Q+ H6 A' `# s8 z( V. `; B
●初始化Windows自定义控制库●
1 f9 h c) E: }* d; l+ b7 f# E9 u, {Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:
: r; b6 r% v7 `, X) [* W: t/ Y i, W
typedef struct tagINITCOMMONCONTROLSEX {& q" t) I6 \+ O- i8 ^0 N. V8 T2 Q
DWORD dwSize; // size of this structure
$ b n+ w" g- k/ q5 ?2 m* r DWORD dwICC; // flags indicating which classes to be initialized! J+ Z" X: M& _6 _
} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX; R; s+ G# }' g3 D% f, _& w5 Q1 s
d3 ^( @. S& \7 h( @ BWINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);' r& K* Q: a3 w1 y8 q, `
# r# Z( y- A% ?$ T; {7 g2 c6 J
IP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:; o8 {' O2 U; B' Z2 v! f
: Q( K" `6 R$ C8 F$ F6 C; w
TInitCommonControlsEx ICC;; y5 n) R" W/ @+ C
ICC.dwSize = sizeof(TInitCommonControlsEx);, ?+ _3 O2 ^) w: F
ICC.dwICC = ICC_INTERNET_CLASSES;
" X4 z- F, I- M* X3 Mif(!InitCommonControlsEx(&ICC))
, X/ o) i+ c& h return; //初始化组件失败
) Q$ ]. O% m' V4 i5 F/ \7 Z' ]6 `
3 f3 h }$ z% _# b* X4 g8 P$ ^●创建IP控件●
! }& y# i+ D: f! l" G2 x2 c3 YWindows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
( l! ^2 R, F! Z
. c7 y+ F1 R! h; hHWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);6 l3 M& w+ Z2 N1 V! E$ s
: I: G& `9 `4 i2 A% R( ?% P●使用IP控件●9 \$ W3 V5 G8 }# ? ^- q
在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:
% D. i% S5 S* O
$ k' T0 i& u3 E k2 R消息常量 消息值 作用 参数及返回值
& k! m1 ?) a& a; H, v" Z* UIPM_CLEARADDRESS WM_USER+100 清除IP控件中的IP串 参数无, F5 c" U2 A5 S9 F9 r$ `& Y
IPM_SETADDRESS WM_USER+101 设置IP控件的IP串 Lparam为32位的IP值
9 e7 v1 s6 z# ~: ?IPM_GETADDRESS WM_USER+102 获取IP控件中的IP串所对应的IP值(32位整数) Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。
8 T5 @% P N( q7 t7 k* c' p& A0 A9 iIPM_SETRANGE WM_USER+103 设置IP控件4个部分的其中一个的IP取值范围 Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
5 [7 L/ f9 O' s# A5 y+ Y) T" kIPM_SETFOCUS WM_USER+104 设输入焦点 Wparam指明哪个部分获取焦点
: F N i9 @0 r1 Z8 T! J6 g8 XIPM_ISBLANK WM_USER+105 IP串是否为空 参数无。返回值:若为空,返回非0;不为空,返回03 a# a$ E3 k( Q- z
/ M& o+ F0 |1 p* |) n" S7 y
★㈠清空IP串(IPM_CLEARADDRESS)★
# d) J0 a6 x$ G% ESendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);
: C0 ~$ Q7 d0 A0 a# g$ i& V7 N5 \9 l* I
★㈡设置IP串(IPM_SETADDRESS)★/ I; w' N- o; q
int nIP;
: R0 C/ Z4 X) o% OnIP=MAKEIPADDRESS(192,168,0,1); - G$ ~, D9 @5 R! j b4 v( \) U
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);6 Q2 B3 ~% Q4 h
$ @- o) X: L2 d7 ]) H此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:
$ D) E7 e$ h" f; p. g9 u#define MAKEIPADDRESS(b1,b2,b3,b4)
2 i. l2 K# N& n/ _$ m! J. }% o; d. K+ {((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))2 ^2 O. A6 n3 X
4 g* J0 R& I- K, O★㈢获取IP值(IPM_GETADDRESS)★6 O& E7 j4 l5 H& m% h
int nIP;
0 G3 J/ q- S, d0 b# r1 ZSendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));! z" s: y- N( x8 S
//nIP++;5 J6 Y1 U2 H- V# e5 q; i- S2 A% D* l
//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP); //将IP加1再赋给IP控件。
1 E6 j& V5 t/ ~% z
0 G0 f5 O2 Y9 D( p若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。8 m# g7 S/ c; H% ~3 N' n" C
3 _7 X/ y( q) ?! Z" e3 y R
★㈣设置取值范围(IPM_SETRANGE)★* j; V8 B1 x) R* p
SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);* Z4 M* A# K$ ?& G! {& C$ z# s/ y
此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。7 B/ Y8 C; p! k' `5 s
! \: P+ Z2 E* h9 F3 l
★㈤设置输入焦点(IPM_SETFOCUS)★3 a! l& X6 |1 H9 e
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);
- c; X8 P2 ]2 _+ P( ?//将输入焦点设在IP控件的第四部分。
' V& o& C4 O& I# Y9 W* _: f$ i+ G5 j" R
㈥判断IP串是否为空(IPM_ISBLANK)
+ C( b F9 [1 B$ _if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0)) - l' j3 J' n) k1 b( `8 [
{
3 |( M, i( L7 C: R //IP控件中的IP串为空6 A! K( H" I' r( P) J) V2 ^
}
) I9 E) Q0 \2 J9 A1 w! j5 I5 x! Z- uelse
9 z7 P. G; [4 r, O( x{/ h# l, r: y& j R; @4 t8 o. C5 d
//IP控件中的IP串至少有一部分不是空的" m$ h' p9 h% q! r8 o" N/ A
}
* H) O# g' `( f; R1 g' X3 r( \* ~$ c- n0 z9 ^
●IP控件的通知消息●6 i+ w( ^, B2 F$ ~0 |! y/ b
当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:
6 J" n2 r1 w8 r/ P. B5 f; W' c+ j5 n5 q
void __fastcall TForm1::WndProc(TMessage &Msg)
) |/ o5 {1 d2 r r{3 C/ ]5 V6 r3 @" g
LPNMHDR p=(LPNMHDR)Msg.LParam;
1 I- ]' N) h6 \4 g4 z if(Msg.Msg==WM_NOTIFY)
3 m6 B+ b) ?/ U7 X {
! A ^5 h0 g% ]/ x x3 p1 W if(p->code==IPN_FIELDCHANGED)
$ D( h' W5 L" l" @3 b4 M0 x3 F M {
, Q1 O" g$ h5 D/ G( k6 S //处理IP控件的IPN_FIELDCHANGED通知消息) {5 {1 v u4 n! I3 y
}
& P3 L2 b/ ]: q2 W' I } x. t9 I2 _% f2 i. L' J. Q H, R$ M4 N
TForm::WndProc(Msg);
$ } ?2 y" A- M$ `: F' J; v( p} |
|