|
|
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。0 p P) X$ x% \4 Q1 o4 F
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592 L/ h' w1 M6 y2 L9 ~0 t
本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:
W3 W" B5 x% e8 K* [) U9 m" t4 T标题:在Delphi中使用IP控件/ v2 y+ F2 c' u
作者:西安交通大学9649# 刘明华$ S+ H) X' ~2 U: x
在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。3 U+ a6 N- a* l5 g# t
如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com2 E& D1 k( _% t/ A% t
ccrun(老妖)(www.ccrun.com) 2003.10.29 I) T$ E+ C2 i& }) @( N3 P7 X
2 `7 b2 i0 g7 S1 K% L% E在网络程序中,我们常常碰到需要用户输入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控件。
* x: h$ F5 B" x4 N$ b' f/ ~, Q1 L. ^ D& d
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)。- L5 _4 E6 F8 a' o
- J: O7 e9 C- U3 T$ \8 [. Z9 b8 L
●初始化Windows自定义控制库●
! M7 e& U; O8 W* NWindows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:- ?7 D+ |5 E9 Y1 _- g0 j5 s
% j. `0 s P+ `) D$ ttypedef struct tagINITCOMMONCONTROLSEX {. ^9 ^$ r' z+ }, W
DWORD dwSize; // size of this structure
; |$ j5 }+ t% d7 Q8 B DWORD dwICC; // flags indicating which classes to be initialized
( r# H/ e2 w& i1 w} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;
2 R* J9 E) N* n( N# m: i7 t5 N4 o! v+ T2 ^) n: ~8 @
WINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);( {% h8 @( n5 W$ @4 _% V0 u3 {
% t P% z6 e. L/ X+ q! R/ z7 n
IP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:$ h: M, Q+ R0 D3 N' Q5 t+ y6 R* o9 }
% @) B' [, q: O8 M4 v' E& i
TInitCommonControlsEx ICC;1 I4 Y) [4 A4 S4 F( ^! T1 m
ICC.dwSize = sizeof(TInitCommonControlsEx);
: E3 ^+ r! S' a# AICC.dwICC = ICC_INTERNET_CLASSES;
6 a4 E: @! u U `- U# O0 jif(!InitCommonControlsEx(&ICC))
4 i' z" d$ L0 R2 s0 I. k' l2 @ return; //初始化组件失败
! M' H! o' g+ ?6 t `1 L( ~2 `
! ~) u! ]9 g9 b. |' K* w●创建IP控件●/ b4 H1 _+ ` r. l8 X' n
Windows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
6 F1 R. c# I0 I Z) d* N
8 x6 N, }$ o8 G5 C: G9 YHWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);* r. s( A/ o: S1 ^6 R& o3 T
x- i9 X. P: e& q3 ?
●使用IP控件●
1 r( M$ B, @; v+ G, |6 c& U在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:
5 O4 s: _0 L$ D3 a3 `# q/ R
0 k3 L1 N" r0 R$ I" k8 u+ h消息常量 消息值 作用 参数及返回值5 o' G. _. a; s0 w/ }3 [' a
IPM_CLEARADDRESS WM_USER+100 清除IP控件中的IP串 参数无
5 Y D/ ~) P% u- d7 W3 F' d! T6 k3 gIPM_SETADDRESS WM_USER+101 设置IP控件的IP串 Lparam为32位的IP值- _6 [7 @( s' m& p
IPM_GETADDRESS WM_USER+102 获取IP控件中的IP串所对应的IP值(32位整数) Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。 , E, l; |8 d- z b. p# G
IPM_SETRANGE WM_USER+103 设置IP控件4个部分的其中一个的IP取值范围 Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。% ]& l6 S E; S2 |3 y; m
IPM_SETFOCUS WM_USER+104 设输入焦点 Wparam指明哪个部分获取焦点 _1 ^7 N. e @ t3 r
IPM_ISBLANK WM_USER+105 IP串是否为空 参数无。返回值:若为空,返回非0;不为空,返回03 C, z% }9 B6 a8 R
" n5 q2 _$ u3 d4 l& x★㈠清空IP串(IPM_CLEARADDRESS)★+ `% G4 I1 h# P% `1 _2 B
SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);$ q; F9 U; ?2 p4 ~' `9 I
" x. `/ v# K" o C t. g. o" r# C
★㈡设置IP串(IPM_SETADDRESS)★% ]1 Z, ^0 {" y
int nIP;! ?7 w# Q- D$ z- X1 f
nIP=MAKEIPADDRESS(192,168,0,1); ( a5 l* g7 X3 J% E$ x: @
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);
- C9 r. R* A; S3 ]% I) l& R3 r$ @* s5 _5 ]
此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:8 _/ ] v3 L$ Q) H4 i1 A m8 h' @& @
#define MAKEIPADDRESS(b1,b2,b3,b4)
) a3 y! Q7 v6 O1 ?% t((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
) w9 b, d: [& j; |6 ^) D$ P! ~: z% ]
+ e& j- X$ B' `+ ]. \★㈢获取IP值(IPM_GETADDRESS)★/ f3 c6 z/ Z3 Y$ }& }8 s
int nIP;: C* I' N, U- z; t/ N
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));
* T0 ?. g3 [ J" d [+ [3 `/ C//nIP++;' C$ ^" [( F9 }4 t* N' h: ~+ j
//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP); //将IP加1再赋给IP控件。
/ U7 ? o$ a4 A& |5 i7 _$ q1 b: |8 J5 }6 M- P3 z
若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。
: D) ^4 L' d% z# U- A, \" Y2 W1 C! Z* G" @- v, |8 S5 C. o* H
★㈣设置取值范围(IPM_SETRANGE)★4 Q2 p5 ~4 A$ Q* l* P: w
SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);
`0 l D2 S: Q3 `; Z8 d此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
- T* x' k, d# n5 ~
7 _' I6 X5 C4 U* s9 o7 V★㈤设置输入焦点(IPM_SETFOCUS)★' a, T- }% g) F+ c9 h
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);
+ ~& H0 ~: w7 N8 x3 I//将输入焦点设在IP控件的第四部分。+ Z; S3 t/ a8 s# n, D1 i5 n1 o
/ g1 l* j" x1 p/ ?㈥判断IP串是否为空(IPM_ISBLANK)1 I1 h' s! O$ _8 G" z% _3 n6 S
if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
' ~" g) A7 V) X{
2 y) k$ n* V" l9 C3 x& [! G; i //IP控件中的IP串为空) F g1 _( X+ x' r v" W, g, ]
}
, [# y3 R8 O6 a2 f0 c2 j6 belse
k: D( M* r7 Q( K& Y{" M( W) L3 ]9 |. x8 [
//IP控件中的IP串至少有一部分不是空的' B( }5 N1 | _9 D( D' ^
}
8 d; C+ C0 J7 O; H# e6 J" X5 k! I; t4 [( u0 b) [
●IP控件的通知消息●4 A" l' o+ Y/ m3 K8 g4 H& r: Z
当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:; S) b% w" t4 ^- g! I
; E- J$ J3 P$ Z; A! ^' W, z
void __fastcall TForm1::WndProc(TMessage &Msg). y: K; Y) t# J
{* W( Z; n3 X7 v, i9 ]' H
LPNMHDR p=(LPNMHDR)Msg.LParam;
7 @% c- a7 ~7 s if(Msg.Msg==WM_NOTIFY): E! I$ j% R: E9 d% ~: i' Q
{5 Z2 j$ f: b% E- S) Z
if(p->code==IPN_FIELDCHANGED)
. `0 k8 i& k* }1 Y {
" z1 B! W" u7 o+ K; } A; G //处理IP控件的IPN_FIELDCHANGED通知消息% x8 ~; J, g8 X+ h
}' l; L3 G6 Z; ?; P0 V* M5 [
}
( k& |! U: U4 z3 j( e; o6 P. Q TForm::WndProc(Msg);; f9 g7 Y2 N) l7 Z! Y1 J9 B) K
} |
|