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

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

[复制链接]
发表于 2004-2-15 13:42:14 | 显示全部楼层 |阅读模式
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。2 h! M% P9 ?+ q& Y
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592& @- Z6 T8 z: ~9 n# z2 \3 H
本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:
: Z* _! F* @- c* ?# C: _标题:在Delphi中使用IP控件3 K' L/ R/ v! `0 f$ s- U5 D1 V" y
作者:西安交通大学9649# 刘明华
! ^& W) j& ^( t在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。
2 q4 }( f" Y* C* h如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com6 l- q& Y$ o/ t; ^- v
ccrun(老妖)(www.ccrun.com)  2003.10.29" p% s! n. e" h2 g, ?$ y
; I3 e6 o  o& C
在网络程序中,我们常常碰到需要用户输入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控件。& Y) J( O& t6 P$ z. ]9 \+ b. A
# i0 A, a: U4 [. Y' C5 a7 _8 ^
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)。
3 e* \+ b) Q) m8 S$ n& \, t6 }/ F! @2 C
●初始化Windows自定义控制库●3 s* C% O2 V" ?1 Q5 D" W! q) Y
Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:
4 b. c* z3 d9 y. E
" ?' p# q4 I0 `! P& @2 d; ftypedef struct tagINITCOMMONCONTROLSEX {
* V; i$ [9 ?. H0 ^' R    DWORD dwSize;             // size of this structure5 A) j+ c3 N3 i/ H" t
    DWORD dwICC;              // flags indicating which classes to be initialized
; u; ^0 s* |! f) `2 n9 Z} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;4 ]$ N# X3 c; g/ a
7 _' W. Q/ _: J: c+ Q3 Y
WINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);
+ `% y7 K' g0 G/ l4 w
8 L8 l& s/ J, M) IIP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:' F$ X. Z5 W8 Y  ?' N4 K

  @+ Y" K6 I- S4 \TInitCommonControlsEx ICC;
- Y2 n6 Q4 P  t( w& f/ ^4 s8 M. @7 iICC.dwSize = sizeof(TInitCommonControlsEx);
  b5 q9 Z3 L" }/ C  N/ V1 VICC.dwICC  = ICC_INTERNET_CLASSES;9 e- N( ^1 J. p5 }5 h/ ?2 o
if(!InitCommonControlsEx(&ICC))5 z: I9 Y; V* x4 E9 b( l
    return;  //初始化组件失败; v4 H$ [2 ?; G, o/ f
5 b* I9 P. U& ^7 P+ p# U+ c
●创建IP控件●1 L5 S, }5 \7 d0 Q, }# N) [6 U9 }9 m
Windows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
& L+ L, {  P1 ~* w# _; x2 P8 z) a
HWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);5 n/ Q0 h  Q# i* ~, x$ W

" A8 B6 V" h& l" u; G# `●使用IP控件●8 t2 l" n$ H, \) x
在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:
) |5 y3 ~% H& j$ x9 J  H0 s$ f0 V1 I5 g# L2 B
消息常量            消息值         作用                                      参数及返回值
1 D1 o" }8 p5 f( CIPM_CLEARADDRESS    WM_USER+100    清除IP控件中的IP串                        参数无8 w$ s0 q, N+ X; P- w# `
IPM_SETADDRESS      WM_USER+101    设置IP控件的IP串                          Lparam为32位的IP值
" Z/ I: w( b% D8 ]  Q' RIPM_GETADDRESS      WM_USER+102    获取IP控件中的IP串所对应的IP值(32位整数)  Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。  
8 h3 u' Y, K6 e6 b8 X3 [2 H+ pIPM_SETRANGE        WM_USER+103    设置IP控件4个部分的其中一个的IP取值范围   Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
, N+ f: C2 K/ V1 Z" `) JIPM_SETFOCUS        WM_USER+104    设输入焦点                                Wparam指明哪个部分获取焦点
# w- ~- l+ w& g, m: F, ~4 ]5 d+ UIPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值:若为空,返回非0;不为空,返回0- j- ^1 X' p" q) D7 Z: C

; o3 \2 \$ v9 j" Y- Z& K) A★㈠清空IP串(IPM_CLEARADDRESS)★3 U- }- M" }- Q! o/ ]$ _% V& Z8 D
SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);
1 Z& E5 F: I3 w: L! V' y" P* B5 p/ _" S
★㈡设置IP串(IPM_SETADDRESS)★
. r1 \; Z$ U" K5 T; dint nIP;; j  R, p' D0 V4 v! ?4 w
nIP=MAKEIPADDRESS(192,168,0,1);
' b/ h) F. ~1 i$ `4 s9 LSendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);6 j1 R  y$ F) i; p0 b* l/ U, G% O

8 ]1 W+ p. R# P$ C( \% g: P此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:
: D9 n6 ~3 m. K  w#define MAKEIPADDRESS(b1,b2,b3,b4)) S7 l! @/ U. L6 e6 e' F
((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
( r& j: R7 Z+ s9 G
0 t# G% [0 b3 N★㈢获取IP值(IPM_GETADDRESS)★0 Q' J# c: J( A- V0 C  m. b+ c; Q- ~
int nIP;
- S! ]4 u+ q) V* A  U/ eSendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));) U% M% z' W7 k3 _. i
//nIP++;: T! D; Q3 q# D- F* K+ v
//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。
2 P* R% \2 [/ L8 d2 w4 f/ A! L! E% w/ g+ @. N- J6 G% l  y9 [% \
若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。
- e' I/ f- N! e5 n
5 \0 L& R% u- K( Z: D7 t0 w★㈣设置取值范围(IPM_SETRANGE)★
  W$ z& V% y( Y8 V  J7 p2 z6 n. NSendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);' N0 P  _$ @# L% b  h
此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
- s9 |$ `. E9 ]9 L$ A3 W& d2 x
1 ^6 h$ V! J6 O4 C+ W  Y★㈤设置输入焦点(IPM_SETFOCUS)★  G5 [$ H: m6 T- u3 g& J
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);: x( N, {; k7 j/ ]; k
//将输入焦点设在IP控件的第四部分。
7 L) r" i% P. Z; o
  `) K! {0 v& U" w" c㈥判断IP串是否为空(IPM_ISBLANK)
  k1 v& A; y# P; I' U0 t  eif(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
( I: P, W1 V' R, O{6 n3 c! z3 o- E% z/ m
    //IP控件中的IP串为空4 n* D4 \. V& f2 Y9 H4 ?* N+ W7 H
}; L% z: R# m0 A/ z% s5 D2 I! D2 J
else
) N1 K1 [6 Q! Q3 p1 I{
9 x7 ?  B  e1 A1 h1 ~    //IP控件中的IP串至少有一部分不是空的! M2 ]' ]6 _. v, I0 v! p
}# g! N1 c2 _6 G4 z4 \

1 w  v0 [; r  v, i/ ^! Q●IP控件的通知消息●6 T5 G. t8 N3 R9 e7 L4 W8 {
当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:. S! |1 f' S$ c7 C6 r  Z$ Z+ @

  ?- _4 h8 {- [% g; Zvoid __fastcall TForm1::WndProc(TMessage &Msg)
9 H$ y% X; t' X! M/ A% [{
5 i! I# U  d6 V( C    LPNMHDR p=(LPNMHDR)Msg.LParam;
7 s: V1 r( m8 x# w+ L4 c    if(Msg.Msg==WM_NOTIFY)
1 g) k6 F& \: g. E( V( D: c+ n    {' c; V( e& Z5 [  V3 H  l4 k9 e
        if(p->code==IPN_FIELDCHANGED)7 }+ [4 c( ?. R
        {
2 h! I3 L$ N6 F$ B( {            //处理IP控件的IPN_FIELDCHANGED通知消息
" e: V2 T- s7 M% b* t- `3 ]. ?$ }, L        }' }2 p& B9 d5 ]
    }
" U+ c4 }: q$ P- d4 [1 m0 B    TForm::WndProc(Msg);
. z) ?9 Q% B6 U4 f: ~) A; Z}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-6-18 13:07 , Processed in 0.018751 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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