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

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

[复制链接]
发表于 2004-2-15 13:42:14 | 显示全部楼层 |阅读模式
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。
  `; B7 N5 |6 A) D欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592, c, S& e3 Q/ {. o# b: R5 a8 n
本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:
+ W# R6 C. _+ _* Y4 j标题:在Delphi中使用IP控件. K: o/ E) B1 ~% X" b; S7 K
作者:西安交通大学9649# 刘明华
, q1 j$ u, ^. D+ |在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。
" F8 f/ |2 M% u, L$ A如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com8 S2 K, {7 j3 Y& \4 n2 k
ccrun(老妖)(www.ccrun.com)  2003.10.29
6 G* R$ ~$ Y9 T' m! F! x. t$ K0 l- W  T+ Y" `# v3 a$ 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控件。
4 B1 `& u! x$ d& G% P% Z1 s
9 y3 ?/ ^: [" ]  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)。
2 l0 Y: n) s# H* n
# S* g6 d6 M* b- `) q●初始化Windows自定义控制库●8 t: i: |+ C' t, d1 m
Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:- m  |! l1 X5 m  l- J
% s9 M$ G; D5 [. m8 o
typedef struct tagINITCOMMONCONTROLSEX {
. {, l8 C9 E, A! ^2 T  D    DWORD dwSize;             // size of this structure
" ^, h- E) f/ R    DWORD dwICC;              // flags indicating which classes to be initialized
. y7 ~6 M6 r5 [( p- O7 N. B  ?, F} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;- c) ~2 z2 M# w+ Y* S6 g% F* C

. K; D% m* E; Q3 FWINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);
4 c2 m$ d7 ~) t3 o3 D% N. l5 h1 e* F( r, a4 |6 a& [
IP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:
( u! f( q( b0 }4 m# D( i5 e5 D; X# ~% t, L
TInitCommonControlsEx ICC;
" }5 i' u7 `6 g: b. `& Q5 rICC.dwSize = sizeof(TInitCommonControlsEx);( v% C$ }, t0 e' D
ICC.dwICC  = ICC_INTERNET_CLASSES;
$ g- K4 L, }! r. Q1 l6 o* O+ y# f9 A: Eif(!InitCommonControlsEx(&ICC))1 m  ]+ ~6 D* Y/ I! x3 l
    return;  //初始化组件失败* f+ g9 J" W% @/ Y8 r

! H+ ]" \; V$ S●创建IP控件●- |6 K* N4 R# b
Windows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。( U$ _$ [. R& A+ _6 O

" t6 R4 W; \% bHWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);. L1 u9 C) ]: x  Q

/ n: N* B* `" ]- ~) w●使用IP控件●, M4 x  H% ]; C0 q0 f( _# Q
在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:
% h& {5 y2 P! L; K7 b' s3 b
1 I$ Z! A  X* d& a消息常量            消息值         作用                                      参数及返回值( R6 h0 s8 S$ C: _
IPM_CLEARADDRESS    WM_USER+100    清除IP控件中的IP串                        参数无+ G/ T3 k) b& t5 V, n6 m
IPM_SETADDRESS      WM_USER+101    设置IP控件的IP串                          Lparam为32位的IP值
4 F, e: m" E+ h) t: p# T, n8 b6 `IPM_GETADDRESS      WM_USER+102    获取IP控件中的IP串所对应的IP值(32位整数)  Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。  2 j+ V7 t6 a# J0 a# _' @/ d
IPM_SETRANGE        WM_USER+103    设置IP控件4个部分的其中一个的IP取值范围   Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
: H( K1 `/ c  l% [0 ^$ S( \IPM_SETFOCUS        WM_USER+104    设输入焦点                                Wparam指明哪个部分获取焦点
# s% I* o; P; a# m. H1 a5 ^) W0 oIPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值:若为空,返回非0;不为空,返回04 |) m3 M  s% s8 b$ l# i# \
/ y7 ]2 K3 U) \- u" K; O' a+ f6 o& B
★㈠清空IP串(IPM_CLEARADDRESS)★" T/ D$ R6 `/ E
SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);9 g2 M, m$ i  a0 c3 u. y
/ ~! H& p" i! [3 S* c. [" b
★㈡设置IP串(IPM_SETADDRESS)★
) y% p7 u6 J6 W1 _, X. Eint nIP;! d6 {8 q$ X8 L  O, |
nIP=MAKEIPADDRESS(192,168,0,1);
+ I7 q8 M; j4 b2 E: }1 X; kSendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);% e" e+ L1 k1 m( S, G0 o" L
, F- d4 k9 k/ R
此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:
& ~3 R  J+ C1 b3 [# e5 G/ l#define MAKEIPADDRESS(b1,b2,b3,b4)
- ]# q+ P8 p: P((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))7 }% @, N9 I) c) b" X& T
4 `& i1 k/ i- [# B& R  a0 H% M4 p
★㈢获取IP值(IPM_GETADDRESS)★( |& d0 d3 c% a' d
int nIP;
" |  v5 z6 v$ T. a( i3 sSendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));7 k" t( {% _+ N, I: E( m
//nIP++;% O& Q+ Q6 w% ?
//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。: ^. p+ q) u9 |) d
1 P1 o1 i2 Q7 U+ Y/ w5 {
若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。2 w4 r0 I1 n3 s

% t! e/ W+ a" F, s; a0 O★㈣设置取值范围(IPM_SETRANGE)★
. W  i' T+ h' `. l# O: ]; vSendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);
, g5 [8 [6 L9 Z' S3 I# Z此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。' t/ y9 U& y- J  n6 g

! v% z* G# D2 h7 W+ U6 L5 Y★㈤设置输入焦点(IPM_SETFOCUS)★1 N/ }5 }) m( {9 @9 \# P# ^
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);
& b! x9 \/ ?# e2 W; |//将输入焦点设在IP控件的第四部分。/ @7 p/ h- M. j+ u- E% u1 z

. ]' {1 K$ g' }* p  J8 I㈥判断IP串是否为空(IPM_ISBLANK)
* [2 x+ i6 o' H: x* k" W* e) z" Xif(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
2 k; K3 z# ^% |# a8 g) O3 G# ~' r6 t{3 R2 L/ U7 [" u: y3 P. h
    //IP控件中的IP串为空
4 u' Z+ @! O- A5 Y}
7 ?3 f( D) {, f& Welse
+ _6 I$ ~! G9 r" G{3 M; V( i- s1 V& w1 k* {, j2 f
    //IP控件中的IP串至少有一部分不是空的
5 w% n" ~9 c' l}0 y! ?6 A( \7 L( O7 \6 u
6 {, |( w8 ~' q) j6 K3 v; \
●IP控件的通知消息●) h$ i0 B- H. p% _
当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:, P3 j1 {4 R& k  B" }! T

. _- N: Y0 u% K# W: v1 Cvoid __fastcall TForm1::WndProc(TMessage &Msg)0 ~0 L7 s; \# m: s8 L, {
{6 I) b: a7 K9 |8 o+ ?( h
    LPNMHDR p=(LPNMHDR)Msg.LParam;' s4 ]: Y- p& e* T# b
    if(Msg.Msg==WM_NOTIFY)
: Z. T0 Y+ @$ J    {
9 e/ A; K. f9 [/ z1 ~        if(p->code==IPN_FIELDCHANGED)
3 ~# }& P3 d" @: f+ ~5 x! N        {9 y, K9 m7 o2 }6 Y, [! w  ~
            //处理IP控件的IPN_FIELDCHANGED通知消息4 U# L" `7 n, Z: ]
        }& A5 K; S3 h9 E$ z/ e3 `0 o9 ^
    }+ a6 v0 C1 l6 I% \
    TForm::WndProc(Msg);  p) L2 I3 R8 z9 g2 \7 b$ Y" }
}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

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

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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