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

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

[复制链接]
发表于 2004-2-15 13:39:03 | 显示全部楼层 |阅读模式
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。
# N& j& t4 S' l欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592
, q. u/ l3 l" O本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:
6 y: n* V" {. e% |/ F- ^& z2 D. J& C标题:在Delphi中使用IP控件/ E$ x2 c) T* \/ A1 K  U# ]
作者:西安交通大学9649# 刘明华
, f6 @; N6 ~& _$ H* h3 r在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。
1 L+ p+ ]. n6 ]. k如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com  e, ~- ?+ E9 w8 p
ccrun(老妖)(www.ccrun.com)  2003.10.29
1 a/ R7 t! u/ C: d! w9 m" n. L& S  I- f% f9 q2 ^4 K
在网络程序中,我们常常碰到需要用户输入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控件。9 S( O# R5 h/ p3 K
) g6 Q. S  v3 J( h( \+ F
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)。1 K1 t. F$ k- v  d' Y8 A: A; T3 W

6 W# x! N" ?+ b●初始化Windows自定义控制库●1 ?3 l' _% U* z9 }* }3 r
Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:; O9 f, B1 A* d' l- R& N; M

+ y& w; m) [, @! \& M6 r# ztypedef struct tagINITCOMMONCONTROLSEX {
* j# n- K2 r. y5 L# s, f    DWORD dwSize;             // size of this structure6 C9 s) t+ C8 P: c0 o
    DWORD dwICC;              // flags indicating which classes to be initialized& @' F9 s% h+ y: o7 j
} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;4 a( E. Q8 p  P

4 P* ^" j1 h) ]# X8 xWINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);
2 P% Y& s9 o1 E# q$ s4 }5 p
3 u9 A2 l9 N! ~- M- mIP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:  v& K" r. x# J; i, u( L7 ]
! r" ~. A8 _$ n3 r  T4 V( P% q# s
TInitCommonControlsEx ICC;
$ `  z4 y" e! yICC.dwSize = sizeof(TInitCommonControlsEx);
, ^1 i. G, @2 n& p! D" d$ A  AICC.dwICC  = ICC_INTERNET_CLASSES;
* N) ]& I4 n1 y$ h3 {& O# h. [if(!InitCommonControlsEx(&ICC)); `9 ~  r" w/ J# r/ }
    return;  //初始化组件失败
5 Y: N" D  ]1 a5 C  e" w; e; B5 ~, M
●创建IP控件●7 k) |, f' N; u: S
Windows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
9 }+ @+ o1 W. y3 y. P3 B
& Q$ W& q# J& p8 X; u& r% BHWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);
% N# p2 U& d& s, ~- V
' h7 I& Y4 a; k7 l) k+ l●使用IP控件●% ~' L9 @6 u! P4 s
在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:
. s- r* V" D: Y$ w/ {6 n
* @: X3 u% o) R$ b# ^消息常量            消息值         作用                                      参数及返回值
  x& V' o6 A" i' oIPM_CLEARADDRESS    WM_USER+100    清除IP控件中的IP串                        参数无# p3 M% `* {. p  ~# V- y
IPM_SETADDRESS      WM_USER+101    设置IP控件的IP串                          Lparam为32位的IP值
  |4 ]. u* x' v. P9 wIPM_GETADDRESS      WM_USER+102    获取IP控件中的IP串所对应的IP值(32位整数)  Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。  9 R$ p9 k" I  m
IPM_SETRANGE        WM_USER+103    设置IP控件4个部分的其中一个的IP取值范围   Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
) Z* ]) E. m3 r5 wIPM_SETFOCUS        WM_USER+104    设输入焦点                                Wparam指明哪个部分获取焦点: V" A* D0 [! s
IPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值:若为空,返回非0;不为空,返回0  w3 W: W; o8 ]1 L; w) C

+ P2 O3 L8 m1 H★㈠清空IP串(IPM_CLEARADDRESS)★
6 n5 q3 i+ R+ I% ]SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);  f& Z7 b" z% R: k( m7 b3 q, \
: N6 f/ o3 Y7 \/ o
★㈡设置IP串(IPM_SETADDRESS)★
4 z- f5 ]7 B- Gint nIP;+ t- e, r  r9 ]
nIP=MAKEIPADDRESS(192,168,0,1); ) T3 Q9 ]& S/ F; b8 Y* F- W1 `
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);
: i- n" n. k$ V1 o- N1 D
$ e3 O" e- N; C% X+ }4 I此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:' e: {0 c3 D: V  x/ W
#define MAKEIPADDRESS(b1,b2,b3,b4)
" t7 ^: X2 K% U, B! m6 U((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4)))). r: h8 ]6 b! p! h
# f4 K+ n9 D5 H) g7 N$ v( C% F
★㈢获取IP值(IPM_GETADDRESS)★
6 p' P9 B6 c* ?  {5 }int nIP;( ?, [0 h8 r3 |
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));
* R! Q. n( z% W- J! D3 ~4 ^! p- w8 Q//nIP++;
9 B6 P3 z$ W6 H. W1 Z% I6 H//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。
* E$ A1 Y( G2 Q( d! B7 \- W: K$ ^- n+ ?. I
若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。2 L4 R# M. |7 L

% j- {; E2 u! k, j! \) s4 y★㈣设置取值范围(IPM_SETRANGE)★
6 I' r9 P# G0 NSendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);& E5 Q' B# }, R8 L/ {7 v
此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。7 c2 z; t) t( y" t( g
. R7 D& Z# V& O( y: o. X
★㈤设置输入焦点(IPM_SETFOCUS)★
+ d- ~8 E7 T0 y  Q, USendMessage(hIpEdit,IPM_SETFOCUS,3,0);, J' w$ `+ v: t/ g4 A9 z
//将输入焦点设在IP控件的第四部分。
6 N+ T* B' Z4 n8 T! I! Y. k: t3 Z6 T4 X! N/ q
㈥判断IP串是否为空(IPM_ISBLANK)
2 X* Z" C. z) g' ~7 i) \5 Y& v6 X; v4 tif(!SendMessage(hIpEdit,IPM_ISBLANK,0,0)) 2 \2 B, S6 g3 g
{
. Y0 f$ S/ M4 |7 l- a" E7 e    //IP控件中的IP串为空7 P0 s9 x. ^, X; N6 [
}! D: h# D, H6 u. P0 D
else; ~4 e1 S" Q4 B! l0 ?
{- Y, i: o6 z' g. a
    //IP控件中的IP串至少有一部分不是空的
& R+ {4 o8 }, [- J7 Z" L}1 {, B8 F% P4 ~. o

& w7 w% L. j8 u7 k●IP控件的通知消息●
% h8 I" S( S" q3 H! e0 K当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:
. _+ X& G$ p7 [4 [
/ ^% U* r) s" ~6 [4 hvoid __fastcall TForm1::WndProc(TMessage &Msg)
" D9 M' e: `9 b. d& q! f6 r{
+ \- h/ z8 F0 ]    LPNMHDR p=(LPNMHDR)Msg.LParam;
  W& J7 W4 f: Y& L' M6 B0 N    if(Msg.Msg==WM_NOTIFY); \- y' J9 F1 K0 ~& M
    {* ]( B; ^/ j1 S* ~
        if(p->code==IPN_FIELDCHANGED)
4 j% _) Y8 ^/ A( P# v! O% f        {
# r+ O' d2 e$ ?1 Z            //处理IP控件的IPN_FIELDCHANGED通知消息
; a0 @' U: {" n& Y        }
# y' s. [+ {6 M    }
" x/ q. e2 x7 K( g" O0 [0 u    TForm::WndProc(Msg);9 f, t+ y5 b* W0 |) P/ i" p+ B' s0 j; h
}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-8-15 10:27 , Processed in 0.017570 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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