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

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

[复制链接]
发表于 2004-2-15 13:39:03 | 显示全部楼层 |阅读模式
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。' Q2 B2 d0 j$ q. h# }/ `. E
欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592' q8 g( o7 b+ `
本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:, U% H" [& h+ A: a2 Z/ T# ]: I
标题:在Delphi中使用IP控件% d0 j3 g: S- f# @: {
作者:西安交通大学9649# 刘明华
8 \, W* Q0 t7 O% z在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。& w, M, n# b6 W  W  |' h( a4 X
如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com$ v) ?& v  u+ u! }' G& m* s
ccrun(老妖)(www.ccrun.com)  2003.10.29# I, _1 I( R0 l8 @$ @7 m

9 B& c" M' ^$ h$ C" Q6 o  ]在网络程序中,我们常常碰到需要用户输入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控件。
* _6 h/ x9 u7 w1 k+ ~
; Z6 ]6 d9 q! A0 vWindows中有两个非常重要的动态联结库:commctrl.dll和comctl32.dll,它们是Windows的自定义控制库(Windows Common Controls)。自定义控制库中包含了许多常用的Windows控件,如Statusbar,Coolbar,HotKey等;在C++ Builder中,这些控件大多数都已被包装成可视化控件了。在Microsoft推出Internet Explorer 3之后,自定义控制库中新增了一些控件,其中就包括Windows的IP控件(IP Address edit control)。
! R7 t  m, L; W6 z) P+ P0 o6 l, J
●初始化Windows自定义控制库●
: \+ {6 D4 I' f2 K$ W) H1 n8 Q/ v$ `Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:+ K7 z5 X5 E$ |. V8 T7 |2 _1 y
8 ^! X; G- C3 I$ N$ \3 y# z7 m9 t
typedef struct tagINITCOMMONCONTROLSEX {9 P1 I9 {0 p+ ~$ I, k2 t
    DWORD dwSize;             // size of this structure
& H4 C) v2 ]: }3 q7 V8 f    DWORD dwICC;              // flags indicating which classes to be initialized  g* `6 }, y9 Q4 j( N; S
} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;
7 q2 G+ {; v! r7 {
0 N6 p! j* N' q3 Z: \1 Z% d! D4 L; PWINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);
' N( c1 P- K6 v* R+ k- n2 e3 j1 W) D' T3 C1 ~; w
IP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:5 m# i6 H; z! c5 ?! c* u. I

+ W1 b8 z! ]0 Q& S& DTInitCommonControlsEx ICC;! g, `- M; d$ N9 T
ICC.dwSize = sizeof(TInitCommonControlsEx);
8 T& o( O4 @2 v/ X1 w% J5 U* ^ICC.dwICC  = ICC_INTERNET_CLASSES;9 Q( G) U0 k; r+ v+ R+ c! C! V
if(!InitCommonControlsEx(&ICC))
% i; }  {+ V0 K    return;  //初始化组件失败% z1 ?# S/ d- Z/ ^! d+ }
! _( X- b' L& y0 S8 E
●创建IP控件●+ s4 B( w) g; ?/ d
Windows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。3 B0 ?9 Z7 h* {

4 ~3 K, c, V% gHWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);
7 |: s. H! s- z" w- s) P6 S, G% Q! d8 v3 n  U' O3 D8 Y
●使用IP控件●" q8 s* p; T1 v9 g) d% w, f4 ?
在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:
0 P  `7 w, X, W' Z7 H! ?" C- e& R, x, d% O
消息常量            消息值         作用                                      参数及返回值
, q) `7 z% q& E4 ?/ L, @IPM_CLEARADDRESS    WM_USER+100    清除IP控件中的IP串                        参数无
3 |3 h+ |6 g+ d& M( X5 |1 S& \IPM_SETADDRESS      WM_USER+101    设置IP控件的IP串                          Lparam为32位的IP值) E5 m4 `3 M/ ^& X" N. x
IPM_GETADDRESS      WM_USER+102    获取IP控件中的IP串所对应的IP值(32位整数)  Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。  
3 ~% e% x  Z) nIPM_SETRANGE        WM_USER+103    设置IP控件4个部分的其中一个的IP取值范围   Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
& j. [/ H8 C  B3 Q2 NIPM_SETFOCUS        WM_USER+104    设输入焦点                                Wparam指明哪个部分获取焦点
4 F" u0 l) @  n" U! H( D, n+ XIPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值:若为空,返回非0;不为空,返回0% a. ~* F# H) J

" j7 e: V4 l" {) S! M4 x★㈠清空IP串(IPM_CLEARADDRESS)★
. Y' g& s( J# x$ s5 FSendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);
) F( L. s: u7 b1 \' V5 A# X
% l( D. ~6 `% j/ z★㈡设置IP串(IPM_SETADDRESS)★) W; s* I9 S1 U6 ~9 _- Q
int nIP;! F7 ~4 j4 u6 ~, K/ @. @+ |
nIP=MAKEIPADDRESS(192,168,0,1);
. R' t; I# G+ H, B% R6 L+ U! kSendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);1 J: B) \0 l% W& F  d9 k

# D0 g$ ], R4 H0 Q4 x此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:
2 F+ I% @7 f+ ]  e( t& @#define MAKEIPADDRESS(b1,b2,b3,b4)" n( T& U6 x" [) w/ W( {
((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
4 O2 Q: e; x0 c: P. q
+ R2 x- B. r9 D' k% ^: J3 Y★㈢获取IP值(IPM_GETADDRESS)★5 Q/ R/ F2 ]! X3 }7 F: U
int nIP;( J* F$ j; K0 a# i' I. H4 q% h6 s
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));; P: C1 C7 n; ]; d8 Q. P) ]- |$ O2 |
//nIP++;
  h) ~, c$ V' s& Q2 k3 s8 k//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。
' @5 {& e1 m* P$ a' G
, H5 t5 k# y! }, x/ a) O$ c' Q$ C若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。: p9 Y: b. i# B; q8 C

- V! J* }3 L; z& _' V# a4 |6 o★㈣设置取值范围(IPM_SETRANGE)★  P9 U  [# r- Y+ e. z. |
SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);
9 b* s3 ?5 O' B: x/ j此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
" S3 v% j+ A9 P3 y7 ]! K5 G5 v/ o: V2 I% L% w) b
★㈤设置输入焦点(IPM_SETFOCUS)★; L$ f. J( H) Y6 |* L
SendMessage(hIpEdit,IPM_SETFOCUS,3,0);
) [3 v  ^. a. L, |! k) j& Y) e//将输入焦点设在IP控件的第四部分。
2 P# ?0 V6 Q! K& c' |0 E1 }( F. h7 }; h5 x7 P1 q& v% i9 x* b& }
㈥判断IP串是否为空(IPM_ISBLANK)- N* o& h, n* x9 l
if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
; `2 y3 j6 t# h% k1 k. R; `{, {( u  B$ N$ I: ]( W
    //IP控件中的IP串为空
. u2 v4 O/ G' @$ d8 u/ a! v}0 |2 \$ f) o- y
else. r1 c' \( x/ N9 e8 U$ A
{
  H5 X: F% K4 ?* p! L( x    //IP控件中的IP串至少有一部分不是空的
. A0 N" R- K1 J# v  |}* r1 ~( a% ]2 k

2 @. M7 u( r) i. s$ S●IP控件的通知消息●9 m5 ~: B# g8 `9 T; `
当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:
% S, J% z7 n" F1 H% |5 z7 P( e$ m+ s) p
void __fastcall TForm1::WndProc(TMessage &Msg)7 h; L) |; }( n9 F/ Q2 x. z
{
  W/ u& z; Y  F) e; ~6 j. \    LPNMHDR p=(LPNMHDR)Msg.LParam;
* N- D% C, h3 B: @) i    if(Msg.Msg==WM_NOTIFY)- e  k& Z& ^& S+ [# h
    {; i3 w/ p  E0 \! }; ?2 f( m- S
        if(p->code==IPN_FIELDCHANGED)
" q5 J+ z% d$ b; P9 n5 N# Z        {5 G6 j1 w. X4 T- Y
            //处理IP控件的IPN_FIELDCHANGED通知消息2 e' Q( n5 f- g; d
        }
& s6 r  Y1 T/ f4 V- J7 M' n    }
- ]2 L% R  j2 s    TForm::WndProc(Msg);3 P$ p! f0 j0 S$ n+ W/ _8 H# ]+ q, [
}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-8-15 10:25 , Processed in 0.017972 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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