找回密码
 注册
搜索
查看: 4084|回复: 0

[收藏]使用Windows系统提供的IP控件

[复制链接]
发表于 2004-2-15 13:39:03 | 显示全部楼层 |阅读模式
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。
. C1 G& R; `6 E( H欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592
9 S" m% n) }! x) c) r本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:0 C( W' l, z: c6 U
标题:在Delphi中使用IP控件; L( U* v2 @' ~% R
作者:西安交通大学9649# 刘明华
+ `' z$ B, A/ L  D+ w4 R在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。2 K4 ]7 A, r* L/ C, d
如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com0 N3 I& T) W" \# Z; W; U, V
ccrun(老妖)(www.ccrun.com)  2003.10.29! t- a# o/ {; l

5 y* X* z- c2 v! x& t; L在网络程序中,我们常常碰到需要用户输入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: I+ f' ]* D' O: B3 F, \" a/ g6 Y+ m$ w0 b" o
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)。% T5 ^* x$ B* n' L$ T; a* U

0 O0 w3 D$ h4 ]1 o% w( a1 m) H, O●初始化Windows自定义控制库●
' X: ?4 W1 W4 b: I1 V% k  {) |0 QWindows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:' X! n3 X) ?  J+ K+ X" o
2 }/ v, D/ c, L) x0 @$ h
typedef struct tagINITCOMMONCONTROLSEX {
' ^, P5 r! |9 H' ?$ @. i    DWORD dwSize;             // size of this structure; D4 F* w5 b: D" n
    DWORD dwICC;              // flags indicating which classes to be initialized$ \" f$ |' P" r" V( ]
} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;
) H$ |9 ~  L' y! K5 P+ m
0 S' T8 e& V0 v5 i) kWINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);0 u) P+ g3 ]  w' K1 w. e3 ~% K

# c- N* _( a" dIP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:
+ I7 M2 s$ r7 F; b% M# @% m8 N/ S* x3 C* Q" @6 a7 B& H
TInitCommonControlsEx ICC;3 O1 ?, w1 k( O
ICC.dwSize = sizeof(TInitCommonControlsEx);! d5 m4 J, Y- f3 K) T% z( M0 L
ICC.dwICC  = ICC_INTERNET_CLASSES;
3 S, J# u; z6 n* `7 O" sif(!InitCommonControlsEx(&ICC))
3 H  S7 j  ^9 i7 E0 E    return;  //初始化组件失败
5 J2 n) U3 r/ F: j7 D
  i: d# l7 Y% M●创建IP控件●9 x- b6 \4 {! O+ t1 l! I& Z1 |
Windows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
' w6 K8 _) U  C; V2 G  ~! B; Y$ H! \2 f5 H- u* V
HWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);- N0 h- b; a; m
. q3 u) d% `: l( _+ x9 z. k) ^$ ?
●使用IP控件●
' A: S2 j' n# s在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:3 j. w; T2 Z' p5 A; n

% p! [  D) ~2 S7 Y  G' \消息常量            消息值         作用                                      参数及返回值" m  ?) u0 C+ N7 E
IPM_CLEARADDRESS    WM_USER+100    清除IP控件中的IP串                        参数无4 ^) l9 ?, \' [  X7 L  ?) W
IPM_SETADDRESS      WM_USER+101    设置IP控件的IP串                          Lparam为32位的IP值
' i# D; i. i5 FIPM_GETADDRESS      WM_USER+102    获取IP控件中的IP串所对应的IP值(32位整数)  Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。  , D* n& `! e' ]+ }& F. @/ o% }
IPM_SETRANGE        WM_USER+103    设置IP控件4个部分的其中一个的IP取值范围   Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。3 a) K% W6 E+ _8 W  H% J
IPM_SETFOCUS        WM_USER+104    设输入焦点                                Wparam指明哪个部分获取焦点  [  q3 {2 z+ ]
IPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值:若为空,返回非0;不为空,返回0# p' d( b# A9 o9 O% u7 _
( r& H. R: T) M+ G
★㈠清空IP串(IPM_CLEARADDRESS)★
% X4 Z1 t. W( x. U1 R/ H; [SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);
3 O7 u! V5 Q! _" H- A' ~0 n9 w1 y2 j2 l! q3 G- A
★㈡设置IP串(IPM_SETADDRESS)★
* c$ ^2 ?) e, [; F4 r; F: \int nIP;! A; b* X6 J( W+ w  m& U
nIP=MAKEIPADDRESS(192,168,0,1);
* G1 A% ~9 ^3 U7 iSendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);8 ]( a5 ?6 p' q* r: b
5 {, h4 f& I7 l) r; O3 r
此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:
+ Q4 @- }$ p, r  B#define MAKEIPADDRESS(b1,b2,b3,b4)
4 S7 O" F: x+ M/ ^((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
2 k0 |* y- e: Y: ^+ h8 V! Q: K; o5 W& ~) h. H$ Q
★㈢获取IP值(IPM_GETADDRESS)★+ q0 {3 p% b# Y2 N& H8 J
int nIP;$ R1 n6 v+ d5 `2 N
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));
+ k( Z7 B8 f  u9 H3 U//nIP++;
6 D& m* q  W- A" u//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。
# \8 P4 g8 b/ X( @6 {' X, A% d% D" m7 U% c2 r2 L
若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。
0 W6 e( Z; [" n
5 E; O2 T8 L( C★㈣设置取值范围(IPM_SETRANGE)★
/ T1 w5 C. B. nSendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);
  o4 K6 _$ C* r* \8 Y此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
6 ?  P/ G9 A1 B& u
* i1 c1 d' Y, ?1 a# U* q4 O★㈤设置输入焦点(IPM_SETFOCUS)★
5 c0 q# e" z6 b; d6 CSendMessage(hIpEdit,IPM_SETFOCUS,3,0);( R0 N2 H& Q5 }! u8 l
//将输入焦点设在IP控件的第四部分。: y' T1 k3 X& J+ B( X$ e* a

, Z* y# i3 _3 L! _. d! y3 ~㈥判断IP串是否为空(IPM_ISBLANK)) T; K# ]. b: L2 C
if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
5 N' q) ?& ]9 c" n$ k1 g{2 c6 R7 l  I& K
    //IP控件中的IP串为空' b" E  {+ g9 b% n& ^
}
6 z: N! G8 F' p6 w2 e, Y/ R1 Celse  q1 y: j. T! {# C( M
{
7 X& |6 X, x) U2 d    //IP控件中的IP串至少有一部分不是空的
, t+ B7 J, U5 S6 Q4 h+ D9 J}5 ?; I6 M6 W' D
2 O1 J  p) ^8 M4 d% N) J. {
●IP控件的通知消息●; W. `$ b4 D3 X8 G. `$ Q
当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:
' j4 a0 ]3 p. }, q) j$ o0 P: I* L; A6 J; W0 k
void __fastcall TForm1::WndProc(TMessage &Msg)
' D0 i4 g, n. z( A- Q! ?& x{
  k, C# r. ^4 G/ ?  V5 Y    LPNMHDR p=(LPNMHDR)Msg.LParam;; H, c4 |5 C9 |
    if(Msg.Msg==WM_NOTIFY)4 s: Q8 b- {5 d) n$ w3 D9 i2 z5 T
    {
# M2 ]" [. v3 C& c1 ]! J        if(p->code==IPN_FIELDCHANGED)- k* d5 U8 b7 p& U7 q9 ~
        {
0 ]5 L4 y: D& l' ]- r            //处理IP控件的IPN_FIELDCHANGED通知消息
2 O9 n& d8 q$ N' I        }
8 U( L+ v0 _9 @) b7 d3 O; v    }
! j& z3 u  l9 G) v" L; a4 k6 b    TForm::WndProc(Msg);
4 Z4 x* V! q8 i( S8 z}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|宁德市腾云网络科技有限公司 ( 闽ICP备2022007940号-5|闽公网安备 35092202000206号 )

GMT+8, 2026-5-2 10:36 , Processed in 0.018472 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表