找回密码
 注册
查看: 4207|回复: 0

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

[复制链接]
发表于 2004-2-15 13:39:03 | 显示全部楼层 |阅读模式
作者: ccrun ,如转载请保证本文档的完整性,并注明出处。
4 W* z: c2 B5 x! _* ~欢迎光临 C++ Builder 研究,http://www.ccrun.com/doc/go.asp?id=592* H- j$ r# U1 j# p  y; b9 D
本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料:( E% p' o' f% b0 _- M
标题:在Delphi中使用IP控件' T* o% P% p6 |2 X
作者:西安交通大学9649# 刘明华
& Z2 D7 q5 V7 L0 X6 @8 `在些对原作者的无私奉献表示感谢!如欲转载请保留完整版权信息。
0 ^  O0 S; K5 G( {( J如果这篇文章侵犯了您的版权,请来信告诉我们:info@ccrun.com8 f# Z+ p; z; K6 Q) c; M
ccrun(老妖)(www.ccrun.com)  2003.10.29; e1 r! m) |4 s- h
+ C. a& w$ S7 f
在网络程序中,我们常常碰到需要用户输入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控件。
5 @6 g+ k. T3 |/ _) `5 i  D" u" Z$ D- {" w% ^# e
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)。" A/ Y) L4 n5 [1 D
2 L7 q# M. N6 D) G5 R/ ^4 m
●初始化Windows自定义控制库●
  c3 ~! _: b7 n+ ]Windows提供了两个API函数,InitCommonControls和InitCommonControlsEx,用来初始化自定义控制库。从名字我们不难看出这两个API函数的关系:后者是前者的增强。如果你希望在程序中使用IP控件,你必须用InitCommonControlsEx来完成对自定义控制库以及类的初始化。函数InitCommonControlsEx的原型如下:
$ T# G9 W0 D' R
6 [  w4 ]8 _5 X4 e; b) ltypedef struct tagINITCOMMONCONTROLSEX {
% T5 I8 w" V5 W+ P4 l; g4 X5 _& Z    DWORD dwSize;             // size of this structure3 [# B- j3 c; {/ p3 z* I
    DWORD dwICC;              // flags indicating which classes to be initialized$ x1 _  c& z/ N8 q9 F/ \  V
} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;
- ?2 r8 ?* I+ u9 s2 U; ~, J9 m5 b( ^# M1 S. ]: w& z" J
WINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);7 w  v8 J8 V. P
- G- w3 z7 j$ j- A' @, g
IP控件属于ICC_INTERNET_CLASSES类别的控件,如果要使用该控件,你应该在程序中包含如下的初始化代码:
0 ^8 q; ]* g2 g! N* \6 d, k( H0 k4 t0 T9 m( t
TInitCommonControlsEx ICC;
% \6 k# f$ @5 `ICC.dwSize = sizeof(TInitCommonControlsEx);
3 M7 L. N4 f: {2 eICC.dwICC  = ICC_INTERNET_CLASSES;
6 D, ]. @3 f* H- {" Yif(!InitCommonControlsEx(&ICC))8 H9 q* M" M- H3 H0 a
    return;  //初始化组件失败2 t: ^* k* I* t/ i( Z9 k: Q

" X2 \- l* C1 N●创建IP控件●+ f  u. v$ _3 ]8 y
Windows API函数CreateWindow或者CreateWindowEx都可以用来创建一个IP控件实例。IP控件的窗口类名为"SysIPAddress32",C++ Builder的commctrl.pas单元为其定义了一个符号常量WC_IPADDRESS。下面这条语句将在Form1上创建一个IP控件。
* ?' \. l' [7 H
# s, M+ p% `: \; iHWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILD|WS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);
9 ^9 D1 E" e- q6 u  O7 x3 ?% [4 M- W' O6 v. r' _
●使用IP控件●
2 X5 K+ w0 J- C( T在程序中,我们通过向IP控件发送消息来与它通讯。IP控件可以响应的消息有以下6个,这些消息及它们的含义见下表:4 S6 z2 S4 Z4 z- g( _

2 b6 E8 f7 Z. Y0 I消息常量            消息值         作用                                      参数及返回值9 W# Q! b8 W9 V% \6 M5 t
IPM_CLEARADDRESS    WM_USER+100    清除IP控件中的IP串                        参数无% q2 n8 t& D7 ]) m( z! b
IPM_SETADDRESS      WM_USER+101    设置IP控件的IP串                          Lparam为32位的IP值
" f8 _4 r0 D0 y( `3 h' W! KIPM_GETADDRESS      WM_USER+102    获取IP控件中的IP串所对应的IP值(32位整数)  Lparam为一个指向Integer变量的指针。返回值等于IP控件中非控的字段数目;获取到的IP值存放在lparam 所指向的Integer变量中。  9 w# i, `0 n7 R% u8 C( g
IPM_SETRANGE        WM_USER+103    设置IP控件4个部分的其中一个的IP取值范围   Wparam指明要设置取值范围的部分;lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。
7 x' |  b3 z8 f1 |9 n) }& R( |* f4 }IPM_SETFOCUS        WM_USER+104    设输入焦点                                Wparam指明哪个部分获取焦点
# F' d$ |$ P! m$ F3 Q' o2 eIPM_ISBLANK         WM_USER+105    IP串是否为空                              参数无。返回值:若为空,返回非0;不为空,返回06 \+ `# V- J, E8 e7 |
2 N4 d' T& C8 D' f
★㈠清空IP串(IPM_CLEARADDRESS)★
3 b8 c# y  g( j% B6 ?SendMessage(hIpEdit,IPM_CLEARADDRESS,0,0);4 l6 @4 K5 L# U5 ]" b: k
5 z- X$ h- T% L3 o# c% ^
★㈡设置IP串(IPM_SETADDRESS)★
2 }9 L0 G" [3 m1 Qint nIP;, B( e/ ^! j  |' g' T( y# p* {
nIP=MAKEIPADDRESS(192,168,0,1);
; q5 Z6 l# x( _) \' a- DSendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);
9 Q: @$ A; |( y* h7 o9 {. i. Y
8 r7 v( g( v5 l9 h8 K5 C9 o此例将IP控件的内容设为"192.168.0.1",其中MAKEIPADDRESS是一个Win32宏,定义在commctrl.h头文件中,它用来合成一个32位的IP值:1 C( Q. V1 d! v# V
#define MAKEIPADDRESS(b1,b2,b3,b4)1 o& M. d" A, i1 j
((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
% m0 g, o3 B5 b! }2 h: M9 A; }& k
' p; I% O" v, I2 B; C8 B★㈢获取IP值(IPM_GETADDRESS)★4 M( d' \* [" @4 A2 @
int nIP;" o! c9 O4 O' Z0 B
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));
! y" m6 ]+ @5 v- f//nIP++;
" B: E5 @2 c& z! I//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);   //将IP加1再赋给IP控件。! @4 V, p0 @" ]$ J: Y# s7 t5 o5 \

7 o3 o* s' w" G6 f) {若想要获取IP控件中IP串所对应的IP值,你应该向IP控件发送IPM_GETADDRESS消息,并且需要把一个32位整数的地址作为SendMessage的最后一个参数。
6 O2 n1 G* u9 {5 e# o# J
0 }" V" n% T% X; M. `& w- G" E★㈣设置取值范围(IPM_SETRANGE)★- s9 B! a$ E! ?( i. _
SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8|100);+ P9 g' F' \4 q+ ~# w# G
此语句将IP控件的第一部分的范围限制为100~200。在IPM_SETRANGE消息中,Wparam指明要设置的字段, 而lparam的低16位字为该字段的范围:高字节为上限,低字节为下限。1 }6 r, f, V3 K1 p* k; i

' a. t8 [$ J3 V/ F/ C/ ^1 Q5 U★㈤设置输入焦点(IPM_SETFOCUS)★
) L! U* A0 E, }* r; K# GSendMessage(hIpEdit,IPM_SETFOCUS,3,0);
* k7 J, O* j/ V//将输入焦点设在IP控件的第四部分。
: J5 l7 m: w- H! |3 w7 }0 r/ b9 q
# Y5 U6 V  _# A% P% h* U㈥判断IP串是否为空(IPM_ISBLANK)- B& {$ K& o# K4 Z
if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
; F" k& t6 x( j2 D1 {2 O+ H6 P{
9 O; j! ]. E) E0 e) B" c    //IP控件中的IP串为空* _% o% h6 F! @+ v, {
}! v& b: J0 j% ]5 v, Q& e0 u( |
else
( g7 h* d4 h) J6 t4 h% S% C{
, {6 r% V. `% L' n/ _( w    //IP控件中的IP串至少有一部分不是空的
& D, z# h' [# Z/ u7 U, H}1 u4 e7 _0 q( P2 ~4 p! W
+ Y, C' o( f6 J( X3 G
●IP控件的通知消息●
+ b/ r( c7 p8 F) U4 {* _- b当IP串被改动后或者输入焦点发生了转移,IP控件就会向它的父窗口发送通知消息IPN_FIELDCHANGED。在大多数情况下,我们都可以忽略此通知消息。以下是处理通知消息IPN_FIELDCHANGED的一个示例:
/ X% N$ {) e) O; A1 z, n1 z7 |# \! w$ L! i* i7 c
void __fastcall TForm1::WndProc(TMessage &Msg)' W& P& o, R  p+ y; j+ Y4 E
{
1 _7 v( Q8 c4 R4 {. u! a) k# ]* E5 I    LPNMHDR p=(LPNMHDR)Msg.LParam;
! |  x4 @: R5 ]. i. M; K    if(Msg.Msg==WM_NOTIFY): k% @* }; L! {# b  \
    {
2 ]! a. A9 J( m  u  l2 f        if(p->code==IPN_FIELDCHANGED)
0 C8 I6 x  U( Y, k        {
* v7 b6 P7 n$ ?: G( ]: E            //处理IP控件的IPN_FIELDCHANGED通知消息3 x  d- K; N& \4 n* t% D  W
        }- ]' {4 F$ |9 v3 ?, |
    }
# X# n  s" K' L" a    TForm::WndProc(Msg);
5 U  V5 ?  Z0 [/ k5 z  y* \}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-10-2 04:21 , Processed in 0.016756 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

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