|
|
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。
/ \; f" C4 g% n6 Q4 k欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592$ T1 B7 t$ l* s$ g9 Y+ S
本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:
& I4 B3 b% u+ P& O3 [& g标题:在Delphi中使用IP控件
N- P/ _: j) E5 z+ k; u& U; [# X作者:西安交通大学9649# 刘明华
7 Z: ?( F3 e' x2 S在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。
2 d5 _2 u& B( F: z: ^) a如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com
. S! t% U8 [/ Q; h; G; {- ?& {$ Occrun(老妖)(www.ccrun.com) 2003.10.29
1 m0 I* l s" ]. _# h! W3 ?$ j' A) h4 L, Q' I
在网络程序中,我们常常碰到需要用户输入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控件。 M0 _' {$ p7 R; [# J6 k
$ { p; k- b% D2 L+ [
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)。& k1 @8 o0 |/ n8 f5 C0 X2 \! F
+ t; i* O- d( R# X9 j, q, }5 C- q
●初始化Windows自定义控制库●
4 A* b" T* f( E4 u) D7 q3 SWindows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:' S% C$ F, h b1 B# M2 a
5 x0 A) V5 C$ p0 X8 b
typedef struct tagINITCOMMONCONTROLSEX {1 r$ s; h2 T# C. o- L a6 @
DWORD dwSize; // size of this structure
4 D" w( s5 x6 G+ u2 P% D9 m$ T DWORD dwICC; // flags indicating which classes to be initialized
0 d; ]. \+ T7 y- \" \} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;
$ h% }1 M& ~9 f! F+ \+ f3 |) }4 k. C; }% l5 q; X: T# C6 n
WINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);7 P6 F0 h9 K5 T/ O
5 l& r# [3 h6 m% ^
IP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:
/ l& ^0 A* {* v# i
/ V1 |* ]/ r, A n$ ~5 JTInitCommonControlsEx ICC;0 p8 m3 B! j. J" {' S
ICC.dwSize = sizeof(TInitCommonControlsEx);+ R6 B, v7 a3 a+ Z/ _
ICC.dwICC = ICC_INTERNET_CLASSES;" h' R; Q/ W- w- M# h
if(!InitCommonControlsEx(&ICC))
* ~! ]8 v g% ^) l X! u2 K% } return; //初始化组件失败
4 r% o# ]/ C8 `
5 D8 P# f0 x, n4 l●创建IP控件●
5 i. c/ ~5 J; S2 ~( F$ I- X) v( xWindows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。. l3 f/ }9 h1 _. ^
, t( E; D- n$ t& k/ {. A
HWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);% m) d: i( K: [; x
9 v) Z1 X/ y: o* B5 {. L j( g9 t●使用IP控件●( q( Y# R6 {0 R* \
在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:
, H7 x5 ~% B8 E3 h9 ^$ R3 F# H: V+ H" R
消息常量 消息值 作用 参数及返回值
/ S. ] ^9 a0 Q9 S! PIPM_CLEARADDRESS WM_USER+100 清除IP控件中的IP串 参数无
* G2 E/ g( X; X& Y: w& xIPM_SETADDRESS WM_USER+101 设置IP控件的IP串 Lparam为32位的IP值- P, h( T4 |2 v! x( C6 }- l2 O3 M: c
IPM_GETADDRESS WM_USER+102 获取IP控件中的IP串所对应的IP值(32位整数) Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。 8 w; R$ k4 s G$ U# V
IPM_SETRANGE WM_USER+103 设置IP控件4个部分的其中一个的IP取值范围 Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
3 e- \: N! X9 `# j% p8 QIPM_SETFOCUS WM_USER+104 设输入焦点 Wparam指明哪个部分获取焦点
8 ]- T6 ^1 H( ~/ `$ r+ N; r7 pIPM_ISBLANK WM_USER+105 IP串是否为空 参数无。返回值:若为空,返回非0;不为空,返回0
8 x) J" B% z6 Z- m* V' y; Z
& J" [, Z) K3 @4 _+ z★㈠清空IP串(IPM_CLEARADDRESS)★
: p9 n h2 }7 Y; _3 F0 b, WSendMessage(hIpEdit,IPM_CLEARADDRESS,0,0); D3 B6 D. M; `& y
, m; c. X2 W" j+ c/ }% W+ s" ^★㈡设置IP串(IPM_SETADDRESS)★
6 z9 T; A) I( O. N+ O( A$ Eint nIP;
9 r* b G% G) k6 d% f' \$ x rnIP=MAKEIPADDRESS(192,168,0,1); ' g x! G. f. f. w+ N+ z
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);2 R& w- u4 f: M5 t% N0 R6 c! t# b( \5 {
( w! ~9 H9 j; e C" @此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:3 [* g3 y: d T# i
#define MAKEIPADDRESS(b1,b2,b3,b4)& a3 W+ G W+ k s" F
((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))$ ^: B5 j: o8 G# g0 a2 G. j. g
: l$ @+ S w3 y★㈢获取IP值(IPM_GETADDRESS)★
; s5 ?/ w) N3 E3 ?8 hint nIP;
# k& E0 ?5 a, w! x& bSendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));) A, ^0 L+ s5 m( D1 T# Y
//nIP++;
# d/ b" M# D9 ^# F' |% U//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP); //将IP加1再赋给IP控件。
4 u( x# F" D) N+ f) r" X! M7 @) B, `
若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。
& p- j3 a& d1 e0 y
1 |: G6 E7 f6 k! p8 j S& m★㈣设置取值范围(IPM_SETRANGE)★& _" f$ ~4 n h) \+ b
SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);3 o- W# U; V# _9 Y6 r+ ]$ L1 W
此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。8 f8 j8 G$ G% h B* T
}" Z3 M) R# o4 K4 f# U: N) T, `
★㈤设置输入焦点(IPM_SETFOCUS)★# w) c- e( [' ^: M, z
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);( J6 V# k( @( _3 o- m9 i
//将输入焦点设在IP控件的第四部分。
- y: z9 G0 q3 c# E: a& b
( K& Z- y# V+ ?5 ~' |2 m Y㈥判断IP串是否为空(IPM_ISBLANK)
5 Y( @) A# \* P6 f- Zif(!SendMessage(hIpEdit,IPM_ISBLANK,0,0)) 4 t# @ u; a' v! T
{
6 K+ ?' L* `% K; d //IP控件中的IP串为空$ K& S6 ~: g& u# K% w* W2 {) ~
}
7 U' E" j; V# Nelse
! A$ n, @8 X: @+ x{
2 ?( L+ W" P; e5 T g4 W //IP控件中的IP串至少有一部分不是空的
1 s+ q$ A" O) y" w) ]3 f}
5 N' N; A/ k, [4 X" m# Q) R. H0 F! B# \ |5 `5 L! m" U9 {
●IP控件的通知消息●
9 b6 k3 s( i5 I' ] I/ S# ^当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例: h2 J- t0 b6 ~# S j4 o2 |( |
5 h0 t/ N2 O9 r) Gvoid __fastcall TForm1::WndProc(TMessage &Msg)
, H2 u" G; h# d3 z{& s& f# d1 T/ W1 U: L( N
LPNMHDR p=(LPNMHDR)Msg.LParam;( l9 `8 b! {. N3 n- e/ Y4 N6 a
if(Msg.Msg==WM_NOTIFY)7 ]# m% D+ B3 y$ ]1 C0 m( j
{
6 r7 ]. a& A! B( s if(p->code==IPN_FIELDCHANGED)
6 S; t9 L8 E6 j {
* o$ A- n4 g1 C2 p //处理IP控件的IPN_FIELDCHANGED通知消息
+ c( Z' \1 X6 K1 d1 V( ?- {$ z k% k' U }$ O' k) h* O( T
}/ ?% Q( e. ~" q- H: R; ~$ b
TForm::WndProc(Msg);# \. L2 ` n" S5 o/ v; A! a* [1 t" i
} |
|