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

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

[复制链接]
发表于 2004-2-15 13:42:14 | 显示全部楼层 |阅读模式
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。
) ^# |" _$ d" c欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592
- w  b4 E; N! H7 t. ]% s本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:
+ d# F0 r' g9 B$ m  T' }标题:在Delphi中使用IP控件# U* e( j  P8 E3 v! A1 P
作者:西安交通大学9649# 刘明华
8 s- f5 R7 K* {3 Q在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。
9 x; D+ S- T8 O) c# M& K) u如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com# i* [! ~4 ]$ E4 N
ccrun(老妖)(www.ccrun.com)  2003.10.29
" s5 l9 u$ l1 k3 F" f5 C. d/ P
& ^7 \, o! ]0 b# M) S4 Z3 P在网络程序中,我们常常碰到需要用户输入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控件。
1 J1 E$ d) b- {% @2 ?7 G" w# H3 j# C) \! n5 U7 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)。
( g9 ]9 }4 _0 S+ j
9 `/ R* x- l  @% L. y●初始化Windows自定义控制库●
, P$ i( z" L" d* c, KWindows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:
2 U7 \6 J6 f7 D! a. h% `( C# l3 z) e% P- U' g
typedef struct tagINITCOMMONCONTROLSEX {
! v4 w" z4 w3 Y& h3 M6 H2 a    DWORD dwSize;             // size of this structure
; j2 J- X6 V! F    DWORD dwICC;              // flags indicating which classes to be initialized
9 B! V! }; r" R) Y% a: L} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;
4 e- Q. R5 I8 X, o& l# G4 S# x5 r! |0 i2 W7 T( |( V* b) f
WINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);/ z4 n! M  @' e' r2 u
" U  I4 n) F) g; |3 Y9 ^
IP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:
$ q+ Z9 J; F: r7 b& S
0 T) |' V1 f8 Y% B% w: `! D' `& h- HTInitCommonControlsEx ICC;3 M! q( j: A9 @$ m- m- ^! c
ICC.dwSize = sizeof(TInitCommonControlsEx);. R7 E3 W& a+ K* ^+ T: `( ~
ICC.dwICC  = ICC_INTERNET_CLASSES;
4 h7 v& h" X, P2 g& s% zif(!InitCommonControlsEx(&ICC))! h. D' ~' A# I7 ~8 q3 m! B  p- s
    return;  //初始化组件失败
2 Q" H- D* j9 d. A  _. G8 S- c0 f! u( @( Y  y9 Z
●创建IP控件●
# B5 V; v8 m' ^& J& L& ?0 F4 @Windows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
6 d4 ^" X4 `6 e  e& H8 V# t5 w
2 W/ g$ u3 h1 Y( r5 g6 u0 VHWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);
% `- I1 ?3 e! k/ R0 m7 b0 E5 H( K: d6 c3 u) Y9 V
●使用IP控件●
+ H- E& v( o3 g) m在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:* d; h" e1 W# }! v* c8 M
- z8 i8 b: J; g
消息常量            消息值         作用                                      参数及返回值7 Z. w& Z, a. I  t2 f- K! ~
IPM_CLEARADDRESS    WM_USER+100    清除IP控件中的IP串                        参数无
: a' o+ @, ^9 h, `IPM_SETADDRESS      WM_USER+101    设置IP控件的IP串                          Lparam为32位的IP值3 ?0 [. T0 S: F
IPM_GETADDRESS      WM_USER+102    获取IP控件中的IP串所对应的IP值(32位整数)  Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。  9 I7 B' q# r+ z( [6 e# }! C( }
IPM_SETRANGE        WM_USER+103    设置IP控件4个部分的其中一个的IP取值范围   Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
+ R) Y; \6 m- Q/ u  N! AIPM_SETFOCUS        WM_USER+104    设输入焦点                                Wparam指明哪个部分获取焦点
% @( \8 i% J3 Q, F( l- xIPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值:若为空,返回非0;不为空,返回0# s- s8 E# E' Q3 b
1 ]' F8 ?' h. a
★㈠清空IP串(IPM_CLEARADDRESS)★" e0 t$ y) t  H: F, L% ]8 C' d/ V- v
SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);
9 G" v" x. j3 i; V. d0 M$ a) f5 ?2 n9 t& A3 H, Z' q- P
★㈡设置IP串(IPM_SETADDRESS)★0 S- X; ?  t/ U- D: n) [) v
int nIP;+ N; [2 I( v  o3 W" N0 S# j; B
nIP=MAKEIPADDRESS(192,168,0,1);
" f, e# H# M9 u0 N! }6 V* T) T, TSendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);3 ?% K$ A8 w+ x( h; r
$ @! v# r3 @( ?2 \, R  A
此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:
4 ~1 e4 E3 D0 w1 Z! q, I4 M#define MAKEIPADDRESS(b1,b2,b3,b4)
: U& k; r& ?3 O' b: J8 j((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))3 i) W/ @5 P" h3 W: E! t

9 r; Y6 V9 D: _1 |2 I. |2 y★㈢获取IP值(IPM_GETADDRESS)★
/ z, h% Z4 {' o" S) t  eint nIP;5 m! S7 I, N  l1 C+ W
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));1 b) X" Y% j( C+ c" T
//nIP++;
9 z& S1 f8 ]2 w" v; z//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。; b" u3 |2 c( {2 |

: d2 K* _$ A  ]- T6 a$ I若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。
& p7 n& \: C- v9 e! b8 V( I2 y' n
" v5 s3 K3 P) p★㈣设置取值范围(IPM_SETRANGE)★
5 H" ^, c, f# c$ e4 k: LSendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);) k& n$ s$ ]1 V  A" D
此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
( L; ~8 Z$ @% ^% y) C! F6 i& W$ M: A8 {) i
★㈤设置输入焦点(IPM_SETFOCUS)★
, O* v# K1 Y$ C, n9 F" X6 N) w1 nSendMessage(hIpEdit,IPM_SETFOCUS,3,0);5 f$ y" e: B' O7 b% W
//将输入焦点设在IP控件的第四部分。; p% |' w# i; r. y7 X

: P9 X( X" G- J/ k1 N( k㈥判断IP串是否为空(IPM_ISBLANK)7 Z: B7 P& n3 v9 _9 F
if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0)) 1 d4 T1 E2 [1 D8 y. r" v. f0 Q
{
3 _9 w5 ^. h& Q# U$ B    //IP控件中的IP串为空+ i( B4 r3 l1 P$ t# F
}) r8 P( v* H6 E7 t5 Q6 d
else: ]: `3 f) s/ ]2 ^/ }
{$ J( r% S: V0 f* y$ k
    //IP控件中的IP串至少有一部分不是空的
; X* X! l7 ?6 h/ V, t}
& E3 C3 w$ x5 B0 }( ~' Q
  g9 x. X. d  R1 b* n0 K7 d" A●IP控件的通知消息●
8 H  C' H, r7 N% f当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:/ q' o4 _  }3 w* j- |) k$ m# d
2 h8 J6 R! a/ ~2 C3 I
void __fastcall TForm1::WndProc(TMessage &Msg)
  D( \3 {2 Q# v3 j5 ^2 S{
7 B2 F1 W" h0 r& V$ B4 J) D( v    LPNMHDR p=(LPNMHDR)Msg.LParam;
) S9 P: g" ^; |4 g( h    if(Msg.Msg==WM_NOTIFY)2 `+ v0 ^: T3 P3 B3 d+ n2 d
    {
! ^$ P0 ~& M5 I* ?        if(p->code==IPN_FIELDCHANGED)
. Y. Q' l0 D6 k3 e1 Y0 x4 w! \        {8 y3 i) i8 y$ |, C
            //处理IP控件的IPN_FIELDCHANGED通知消息4 d6 G$ L% h" L) |
        }+ ^; _, {- ]2 R7 l+ L3 K( X0 u
    }
4 Y3 d2 Y+ x: [$ v8 ~    TForm::WndProc(Msg);/ N/ O5 k  j6 b" L/ {& [% w
}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-8-15 08:03 , Processed in 0.021070 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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