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

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

[复制链接]
发表于 2004-2-15 13:42:14 | 显示全部楼层 |阅读模式
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。) }! j  h2 u( T* p7 Q
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592
. z/ x& [2 A# \0 a' `本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:2 T/ @2 l0 [9 u1 O$ L4 j
标题:在Delphi中使用IP控件1 r4 U& D& M# y# H4 t3 [+ G- {
作者:西安交通大学9649# 刘明华
, I" m0 ]5 \( w) p, Z' o2 c在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。) ?- _! Y2 h4 `" i: [
如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com9 E# ^7 r4 J' `) [# c+ D2 A9 j
ccrun(老妖)(www.ccrun.com)  2003.10.29
3 {: a! |+ q, B# v& H. U3 Z
1 c' k5 f# z) o0 d在网络程序中,我们常常碰到需要用户输入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控件。0 P( A1 G5 L. p; ]
& ~' W% k5 j$ u
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)。
$ p/ z3 s6 k+ S/ a+ @% Z) w! N0 H" V4 Y
●初始化Windows自定义控制库●
5 A5 w/ ~, j0 Y" G& x* yWindows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:* c& @/ v; v) k) G

8 `2 V6 u* Z" s% o& ttypedef struct tagINITCOMMONCONTROLSEX {
& p" d. Z1 m/ U7 A, [: w0 y    DWORD dwSize;             // size of this structure$ ]% S* @5 f2 D: t, d
    DWORD dwICC;              // flags indicating which classes to be initialized
7 a8 f6 i# J: y; s# G} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;7 C  f; R& b* w( j9 t% z" T

0 V/ v7 v: n6 m7 k' g4 q; x2 AWINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);
, l9 s7 }' F( k2 p3 C3 t6 y7 E: V
" c/ a$ @2 g7 ]& t/ YIP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:
2 Y* ~- o! Z  P* e
" j% F- \# u' W7 RTInitCommonControlsEx ICC;
4 o1 X; i7 B: q: H' U" [0 vICC.dwSize = sizeof(TInitCommonControlsEx);
6 E3 q) }" o2 ^8 c$ n+ B3 eICC.dwICC  = ICC_INTERNET_CLASSES;: W7 r3 X8 _6 [' E4 ?, M* K# F
if(!InitCommonControlsEx(&ICC))
( m/ h3 f* r- v' s3 a$ @! N    return;  //初始化组件失败0 l) l# S; c" R9 \. _

; G% n( m: G6 l7 V- L●创建IP控件●
- `8 ~" w/ H! B1 qWindows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
: s( }: f; a: n2 S9 n% c+ C) S
+ ^7 S$ ?6 [; }, l# qHWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);
# [; d2 b- N8 \9 E7 p! a5 \
2 `- k$ c6 X/ T. v$ `  A" ~●使用IP控件●; F+ f) F; k* m7 p+ h* d
在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:, s* R3 m6 ?" F" F4 H' a$ r- U
: z' d) w$ y. T  h$ [. i
消息常量            消息值         作用                                      参数及返回值7 Q2 \5 C0 f9 J8 x: n
IPM_CLEARADDRESS    WM_USER+100    清除IP控件中的IP串                        参数无
3 b# {1 G  e/ q, b1 G8 T' MIPM_SETADDRESS      WM_USER+101    设置IP控件的IP串                          Lparam为32位的IP值
" P. I& a8 a8 X3 Y/ {- x) k; \2 lIPM_GETADDRESS      WM_USER+102    获取IP控件中的IP串所对应的IP值(32位整数)  Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。  
  F' d# M  a( Q& hIPM_SETRANGE        WM_USER+103    设置IP控件4个部分的其中一个的IP取值范围   Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。; J+ j% m7 n. X1 z3 O
IPM_SETFOCUS        WM_USER+104    设输入焦点                                Wparam指明哪个部分获取焦点
; B& h8 D$ I# h1 {2 I0 YIPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值:若为空,返回非0;不为空,返回0+ k: T3 g7 _* e  x2 g( P3 I
: P, z# a' E1 A2 z# O
★㈠清空IP串(IPM_CLEARADDRESS)★9 Q. m6 V5 r8 b8 [; E2 r
SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);' u" L5 U( N8 Q* q! [% [
/ |+ ^! ?$ p! e8 t+ c
★㈡设置IP串(IPM_SETADDRESS)★
9 j* I3 G7 w3 W: mint nIP;# [' O, w% |5 M  T
nIP=MAKEIPADDRESS(192,168,0,1); ) k2 F+ c4 K# X
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);: A, A8 u2 G7 k

1 W2 y& T+ v' c8 o此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:: z2 R0 J( s' {+ M
#define MAKEIPADDRESS(b1,b2,b3,b4)- x6 [! b% w9 Q! F0 g
((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
+ z5 M2 P: s/ N$ h, }& o/ Y
0 p' y, D% V+ _( f2 V5 U★㈢获取IP值(IPM_GETADDRESS)★
% C& R. I1 k- _3 Qint nIP;
; b  c, `& ?. r* @$ G% r, JSendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));
, x8 w. `3 e& n% a* q3 H. e  K//nIP++;
; b8 s, u( a% ]4 Y8 |4 S//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。
! c' O$ d! s8 h3 w
! L! a4 k) E$ E5 o0 R" V若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。' V; Z$ o1 e, s: H+ p. i, f# N
! {2 R/ {3 i* G9 d+ @  L8 l
★㈣设置取值范围(IPM_SETRANGE)★
8 {, m! M/ N# f* o7 U: z( ^SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);
1 ^) e/ X* `7 j7 ]0 v: e此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。6 j2 A& M( f! x9 l7 j$ `

. ?5 `8 J7 q  H4 I% t- ]★㈤设置输入焦点(IPM_SETFOCUS)★
+ T8 R4 m: ?; c4 [SendMessage(hIpEdit,IPM_SETFOCUS,3,0);" ~$ m( r0 ?& |/ B/ l0 I# f" f
//将输入焦点设在IP控件的第四部分。8 L5 o6 V5 Y2 [9 m* g1 @1 p; ~

6 Y1 c7 t. ?: N" r- _9 J3 D  g9 `㈥判断IP串是否为空(IPM_ISBLANK)
- t5 m' r- P$ pif(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
4 L% D# |/ u! ^/ l$ g{
8 M2 z$ |( E" m0 m$ ?    //IP控件中的IP串为空
* G) ^+ O# y8 Q* {( ]}
- Y3 n& Y7 }% V" _else) L( L+ a) S  G1 k
{0 c' ?) g; _% U! Q5 n
    //IP控件中的IP串至少有一部分不是空的
$ A* H; ^! l# c3 b}; C! w( O$ _8 U1 }

+ `# \1 C. o. O: L2 L●IP控件的通知消息●
% i/ p3 o- n6 U, E- K6 K当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:+ h) _- Y) F! _! w

% o# c! S8 L" Evoid __fastcall TForm1::WndProc(TMessage &Msg)' q+ L* a3 X( e! f, T( m. ^/ a
{) `4 V) A5 p8 F$ G6 E
    LPNMHDR p=(LPNMHDR)Msg.LParam;
' V, |+ I/ J" b    if(Msg.Msg==WM_NOTIFY)
1 O7 n" d+ n4 D" N    {
$ s2 p( n5 {5 k" P        if(p->code==IPN_FIELDCHANGED)
* G' v: d7 W1 W- W1 v8 R! h% p+ e        {
& v  ]& f" R' p5 \; A1 T            //处理IP控件的IPN_FIELDCHANGED通知消息
0 X; q' D4 Z( k* s, K        }, C" N) m1 s* v6 L! t% A# `
    }( l  S* O. r6 F( i! @0 B
    TForm::WndProc(Msg);7 W) O- R4 N2 ^# E3 Y
}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-8-9 06:50 , Processed in 0.034479 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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