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

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

[复制链接]
发表于 2004-2-15 13:42:14 | 显示全部楼层 |阅读模式
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。- N- t: B, f1 {9 H5 B
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592
. Y. [9 ^) i0 G& m# `& V本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:* |4 U, k& [' Q8 F4 P, f( c2 w- G
标题:在Delphi中使用IP控件
% n5 Q/ ]* f# a8 Y( ^) M. C* g作者:西安交通大学9649# 刘明华. I' T. y3 \, B2 W
在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。
# f/ ^: G. Y2 k( q6 l* V" w- b  X, T) L如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com
' v6 r/ d. _9 f) D4 `ccrun(老妖)(www.ccrun.com)  2003.10.29
. T+ O+ ~% p, F( U  b) F6 x5 E' {6 J" ~* p6 @2 b4 c2 q
在网络程序中,我们常常碰到需要用户输入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控件。
% A+ q* J: M3 O! k% m+ H
5 R# F" l4 `% u5 U* b+ eWindows中有两个非常重要的动态联结库:commctrl.dll和comctl32.dll,它们是Windows的自定义控制库(Windows Common Controls)。自定义控制库中包含了许多常用的Windows控件,如Statusbar,Coolbar,HotKey等;在C++ Builder中,这些控件大多数都已被包装成可视化控件了。在Microsoft推出Internet Explorer 3之后,自定义控制库中新增了一些控件,其中就包括Windows的IP控件(IP Address edit control)。, d  e& m* n& g% K' L1 _, a

$ J, W1 z3 G5 {●初始化Windows自定义控制库●
9 p; H' @& ]5 {Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:0 T' w1 d  ?4 J

- ?2 @0 O" T; e( w8 d, o( Ytypedef struct tagINITCOMMONCONTROLSEX {1 q, ?: w  M, P; m; i
    DWORD dwSize;             // size of this structure' h# I( r4 E+ e
    DWORD dwICC;              // flags indicating which classes to be initialized. h  G) c* E. W2 X
} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;
5 I, O4 W$ b8 v5 S* U$ G# o8 g
5 v8 ?# s& w2 u3 l* ?8 xWINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);: W* }. I/ R! N# \) I

& h% K- ~# u9 t8 q5 R' PIP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:; X  Q" m" g5 M* w# p

7 [* o) |7 D/ H, u) O; k( DTInitCommonControlsEx ICC;
# W4 k/ i6 o" w: Q# \" V1 zICC.dwSize = sizeof(TInitCommonControlsEx);7 Y2 H9 u/ k2 a3 J  M  l: H
ICC.dwICC  = ICC_INTERNET_CLASSES;. o4 J2 Q$ [+ f  @
if(!InitCommonControlsEx(&ICC))
8 }. y" U* T( |- n. Z6 J& j9 D, i) {    return;  //初始化组件失败
7 V* c$ E+ x! _+ Z2 i( l
  ^: W- y5 n7 X- ?●创建IP控件●1 i$ @+ M! ]% Q+ B! R) ~3 J
Windows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
2 k1 z7 ?9 d0 `5 A: U4 r' R
2 K" u6 B+ K  S! a  Y9 d: K5 uHWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);, m- V" _  l+ ]+ \

$ m4 i. ], h8 [9 U+ q& o2 N●使用IP控件●3 z  z2 y7 l* ^' c7 t3 J
在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:) Y- ]6 S( o: j  _$ X) u! O% t
' y1 Z+ Z' l( F& {- ~
消息常量            消息值         作用                                      参数及返回值
' t. i3 Z+ b) ?IPM_CLEARADDRESS    WM_USER+100    清除IP控件中的IP串                        参数无6 d% V! V* U/ L' J2 V% q; F! P1 S
IPM_SETADDRESS      WM_USER+101    设置IP控件的IP串                          Lparam为32位的IP值" m) T; ?7 r; a. N2 d
IPM_GETADDRESS      WM_USER+102    获取IP控件中的IP串所对应的IP值(32位整数)  Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。  
) W. z9 L" O. q( [4 }IPM_SETRANGE        WM_USER+103    设置IP控件4个部分的其中一个的IP取值范围   Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。( M% g6 ~1 O4 s7 C- l
IPM_SETFOCUS        WM_USER+104    设输入焦点                                Wparam指明哪个部分获取焦点
$ d/ b  \& O/ G8 C3 GIPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值:若为空,返回非0;不为空,返回0
( H4 s4 J8 ]- U7 K" _# s" Y
& e8 `$ O& }* }% t. ]★㈠清空IP串(IPM_CLEARADDRESS)★; c- J: H0 E3 y  U( X$ m
SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);7 z. w: T; [2 U- J

3 \( f; t+ i8 b0 Q2 K; u★㈡设置IP串(IPM_SETADDRESS)★
: C3 G, F$ `# Z, ?+ W$ Zint nIP;# Z+ M3 ?& ?* }8 h  ~* c% K
nIP=MAKEIPADDRESS(192,168,0,1);
: i, W' d" J. M) C! t  V3 w/ @" JSendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);8 n  X, ]3 [0 P; y1 \

0 H5 V. S; e# V% i) Z" o此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:
, S* p4 S% f$ S3 p#define MAKEIPADDRESS(b1,b2,b3,b4)1 E3 }  I* |$ c2 s
((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
" w6 y; X/ _. w; ]7 L
% L. n( \1 X# j$ Y( D' g★㈢获取IP值(IPM_GETADDRESS)★/ R# Z4 |$ D- R$ e1 S
int nIP;! X/ l/ `6 g/ ^. j0 L+ Z
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));" l; @" ?. D5 V% k2 x7 t% ^
//nIP++;
( T! U$ K2 x) w2 j% M" y8 y//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。: X6 s" A/ I: u* D  e0 {, I
3 l- `* E+ k0 R0 B
若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。
% Y/ d. ]% d- Y$ Y, w- K% Q
4 _* P2 n1 G4 u: w9 D★㈣设置取值范围(IPM_SETRANGE)★9 ], P/ x" [) |
SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);, s5 W* C) Z% w' i# \
此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
& \/ U1 K$ k8 q& r- s+ J4 t3 s9 @, ^- g) ^% G) C
★㈤设置输入焦点(IPM_SETFOCUS)★. B& l! |. D2 B7 L( P4 z5 ?( b
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);! _$ }) |7 E1 h
//将输入焦点设在IP控件的第四部分。" l4 j% @* o. x

8 {7 p) i2 o; x: _% i㈥判断IP串是否为空(IPM_ISBLANK): b3 j# y/ E. P( d1 v8 ?
if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0)) - I! n" M( x6 |5 K
{3 P2 x) a9 r- w: Q! a
    //IP控件中的IP串为空
+ U+ G4 ~: L/ C  e+ M2 J}4 N0 J+ l& o' D. v& L2 o  E
else% w% R, u9 p' q$ `
{
7 H0 D4 k0 ?& |& r% ?) a& A: J7 w    //IP控件中的IP串至少有一部分不是空的" {( f9 Z% e7 b8 t
}$ I" z. s9 Z, U/ a
6 h$ S- L) [. `: z( C" F
●IP控件的通知消息●0 H' T5 u9 v* |
当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:+ u  z9 E; M. N: ^; h

& \3 d( d+ K- Q  rvoid __fastcall TForm1::WndProc(TMessage &Msg)
) u/ N( [& ]6 ]" ^. x+ Q! x{) ^8 w5 A- n! D2 Y% E2 K$ a: j0 w0 H
    LPNMHDR p=(LPNMHDR)Msg.LParam;
4 t/ ]; V/ }; _0 _) S8 |, H    if(Msg.Msg==WM_NOTIFY)
- |2 a$ m+ M5 s    {
- K  o/ k& H" d# q        if(p->code==IPN_FIELDCHANGED); ?$ ?7 p+ @, o
        {0 r" W4 a7 H8 f
            //处理IP控件的IPN_FIELDCHANGED通知消息
: M5 M0 C. `& I* J) s        }8 \" h3 ]8 e' J
    }& W. X; {0 m$ r& q* e: t, I
    TForm::WndProc(Msg);- d: a# G7 E( |- i- _/ Z6 R
}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-6-18 09:03 , Processed in 0.017499 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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