|
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。5 [. A: z( v* s- [7 u9 f( _
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592
3 Z0 q7 E. c9 |7 U2 z0 X本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:( a2 V+ m/ P$ Z8 U% k
标题:在Delphi中使用IP控件7 g* O! u2 C" X. R( |9 S8 d7 [
作者:西安交通大学9649# 刘明华
' C& j6 l* f3 n4 Y; K, q在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。: ]% ^9 \& w5 K
如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com" L' {; L" V3 q. _1 `8 Y( L
ccrun(老妖)(www.ccrun.com) 2003.10.298 q J; G7 d6 k! t. Y8 f `9 b
2 g/ T7 g8 ]& U0 n- M' b
在网络程序中,我们常常碰到需要用户输入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控件。
( t2 ?* q/ B1 g( z* d3 C) M+ R# J8 o1 Q1 c" W
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)。
( e# x- K! f5 i5 W* a
- K3 p. e4 J \8 c3 [●初始化Windows自定义控制库●( w7 A$ C3 J' {, G6 `
Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:
, J7 j) f7 u% T: l. O( W3 @+ \, k. u8 ^2 U$ s1 S( u
typedef struct tagINITCOMMONCONTROLSEX {
% C; v6 J! _3 h' Q7 M DWORD dwSize; // size of this structure; b: F$ d5 U, ]
DWORD dwICC; // flags indicating which classes to be initialized
+ k! Z3 H% P8 v8 h2 G} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;# @3 p! P- [1 I- U6 T X m; ]
6 y! b8 f9 I* e! _/ gWINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);
+ Q. A: e, C6 H, o3 [0 V: M8 f6 _ J- ]
IP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:- O0 |; }( w. q
2 b& b! v6 n; q$ aTInitCommonControlsEx ICC;+ m3 w% ^6 Y! w, |7 ?9 w; v- x
ICC.dwSize = sizeof(TInitCommonControlsEx);# I# d @% f7 _! N% X, C
ICC.dwICC = ICC_INTERNET_CLASSES;
. a+ x3 @( F/ R& t3 T+ H7 p9 yif(!InitCommonControlsEx(&ICC))+ A1 ?1 U! [& U9 k* i
return; //初始化组件失败% _4 ]: v. {4 Y% ?
& R0 v2 Z4 J% p4 M s' o2 w
●创建IP控件●
9 X6 `( q0 T) k/ `1 n5 eWindows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
: Q0 \ ~/ s6 H0 r6 G, T: X0 h
* A. U6 k7 K% c: q' V% Y, F+ MHWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);( R6 P' \0 ^0 k S. Z- [
' B p- G1 e# z! _( \ u$ J9 p" I6 U
●使用IP控件●. i( p* Y$ C( }& i. _" S9 g
在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:5 e; k$ P/ r! `( [; X/ {" A
% L) t% |" a- @# n消息常量 消息值 作用 参数及返回值3 Q* e7 U) G/ ?2 z- ]. K; q* K2 }0 m: I
IPM_CLEARADDRESS WM_USER+100 清除IP控件中的IP串 参数无! q8 V# I, a# p# |8 x1 I1 T7 X
IPM_SETADDRESS WM_USER+101 设置IP控件的IP串 Lparam为32位的IP值
7 F/ ?0 @/ B, sIPM_GETADDRESS WM_USER+102 获取IP控件中的IP串所对应的IP值(32位整数) Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。
) r; z# m) Y) U* K9 qIPM_SETRANGE WM_USER+103 设置IP控件4个部分的其中一个的IP取值范围 Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
- k* D1 }2 @- m6 a# F; ]& SIPM_SETFOCUS WM_USER+104 设输入焦点 Wparam指明哪个部分获取焦点" X6 Q. y6 @) C
IPM_ISBLANK WM_USER+105 IP串是否为空 参数无。返回值:若为空,返回非0;不为空,返回0
. w" h; w( f. }* x) S4 p. A
; u5 @2 P: a8 f1 V5 A★㈠清空IP串(IPM_CLEARADDRESS)★
3 M# B" s ^0 i" s) m4 C# }2 KSendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);
- c3 Y1 Q7 M, x1 f9 @" _
9 Q& _% P/ M6 I) b, `) }★㈡设置IP串(IPM_SETADDRESS)★- K5 V& F7 H! D& ~, ~
int nIP;9 x4 m9 V* ]- s& t, \
nIP=MAKEIPADDRESS(192,168,0,1); . z( V) ^+ F' j
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);" J$ @' p& W. k1 s* J% x, M
6 A- y" V% Z" m3 r0 D/ F( W% @6 S) t: n1 U
此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:
9 a; Z5 j5 a: y' K' W# Z3 ?#define MAKEIPADDRESS(b1,b2,b3,b4)) v( N. c5 a' ~; a ]* O- w/ B
((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
! t5 x# W* v9 R" z8 l" y, v: l7 a/ e& a; C
★㈢获取IP值(IPM_GETADDRESS)★" t5 A) a4 T8 m. U$ z
int nIP;
! {0 |4 |* t5 Y" }) Z. n- sSendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));: m* J# y" {8 s4 U3 x' x
//nIP++;
' \% O5 G3 }# Z& Y# i6 ]//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP); //将IP加1再赋给IP控件。: O6 v: N& A! F5 g$ B
% c+ m3 N& z; m; D, l若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。
* ^! k$ E$ K6 e( ?# y
9 C% w* }6 Z9 A) W★㈣设置取值范围(IPM_SETRANGE)★8 a X( ^$ K" I: X3 h6 y B
SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);/ M2 c+ Y; J E! {3 R5 f
此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。& y1 N7 b( l3 I
9 N8 R$ I! A% b$ G
★㈤设置输入焦点(IPM_SETFOCUS)★) }, E/ e" N: p* R) N: N
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);" h) Y2 F- Y' q# W9 x+ o! J
//将输入焦点设在IP控件的第四部分。* A4 A" V F q
) X" j- }& h# m0 H' G: V
㈥判断IP串是否为空(IPM_ISBLANK)
0 t- e3 A2 R! g# R& Hif(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
' `% [: r; T' Z* C; t{! {8 t$ z! N4 _: O; q, j, \+ X1 b$ i
//IP控件中的IP串为空' ^( q6 l8 Q% ^* y
}
& v9 X0 n f/ v- helse1 G" @/ R: P$ ?( v9 k( K8 O
{
+ A+ r% m: ^$ n* s //IP控件中的IP串至少有一部分不是空的3 h* n% I9 v7 G. z: h
}: @3 b$ h$ r# g* D$ J# R/ k- {
* W" F' H6 i* [●IP控件的通知消息●- T/ y- V0 t3 z9 [) x2 j8 d' K8 ?
当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:% d# N; R5 o" z5 ^' M
9 O. B% M! r) f# u. N @void __fastcall TForm1::WndProc(TMessage &Msg)4 Z* V3 ~; ]. ^) z0 O) T
{
, e+ F7 H1 `9 a1 `3 x LPNMHDR p=(LPNMHDR)Msg.LParam;
# }% ~& P+ h. P if(Msg.Msg==WM_NOTIFY)8 R- A7 ]& {7 h1 ~3 e4 m. E
{
; X8 z% j: Y% X' m Q0 _ if(p->code==IPN_FIELDCHANGED)
- \4 f+ P4 K5 v9 h% Y, X {
9 `1 ~$ I9 _9 Y( ^5 J4 c //处理IP控件的IPN_FIELDCHANGED通知消息
: D2 h9 E4 [. r }
9 h, Z; y$ e3 ^; J- c# y; W }
' K j, c/ ]$ G' o" ` R8 `) T TForm::WndProc(Msg);: e& D1 |! j7 |0 H7 o1 r
} |
|