typedef strUCt tagINITCOMMONCONTROLSEX {
DWord dwSize;// size of this structure
DWORD dwICC;// flags indicating which classes to be initialized
} INITCOMMONCONTROLSEX, *LPINITCOMMONCONTROLSEX;
WINCOMMCTRLAPI BOOL WINAPI InitCommonControlsEx(LPINITCOMMONCONTROLSEX);
IP控件屬于ICC_INTERNET_CLASSES類別的控件,假如要使用該控件,你應該在程序中包含如下的初始化代碼:
TInitCommonControlsEx ICC;
ICC.dwSize = sizeof(TInitCommonControlsEx);
ICC.dwICC= ICC_INTERNET_CLASSES;
if(!InitCommonControlsEx(&ICC))
return;//初始化組件失敗
●創建IP控件●Windows API函數CreateWindow或者CreateWindowEx都可以用來創建一個IP控件實例。IP控件的窗口類名為"SysIPAddress32",C++ Builder的commctrl.pas單元為其定義了一個符號常量WC_IPADDRESS。下面這條語句將在Form1上創建一個IP控件。HWND hIpEdit = CreateWindow(WC_IPADDRESS,NULL,WS_CHILDWS_VISIBLE,10,10,135,47,Handle,0,HInstance,NULL);●使用IP控件●在程序中,我們通過向IP控件發送消息來與它通訊。IP控件可以響應的消息有以下6個,這些消息及它們的含義見下表:消息常量消息值作用參數及返回值IPM_CLEARADDRESSWM_USER+100清除IP控件中的IP串參數無IPM_SETADDRESSWM_USER+101設置IP控件的IP串Lparam為32位的IP值IPM_GETADDRESSWM_USER+102獲取IP控件中的IP串所對應的IP值(32位整數)Lparam為一個指向Integer變量的指針。返回值等于IP控件中非控的字段數目;獲取到的IP值存放在lparam 所指向的Integer變量中。IPM_SETRANGEWM_USER+103設置IP控件4個部分的其中一個的IP取值范圍Wparam指明要設置取值范圍的部分;lparam的低16位字為該字段的范圍:高字節為上限,低字節為下限。int nIP;
nIP=MAKEIPADDRESS(192,168,0,1);
SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);
此例將IP控件的內容設為"192.168.0.1",其中MAKEIPADDRESS是一個Win32宏,定義在commctrl.h頭文件中,它用來合成一個32位的IP值:
#define MAKEIPADDRESS(b1,b2,b3,b4)
((LPARAM)(((DWORD)(b1)<<24)+((DWORD)(b2)<<16)+((DWORD)(b3)<<8)+((DWORD)(b4))))
★㈢獲取IP值(IPM_GETADDRESS)★
int nIP;
SendMessage(hIpEdit,IPM_GETADDRESS,0,int(&nIP));
//nIP++;
//SendMessage(hIpEdit,IPM_SETADDRESS,0,nIP);//將IP加1再賦給IP控件。
若想要獲取IP控件中IP串所對應的IP值,你應該向IP控件發送IPM_GETADDRESS消息,并且需要把一個32位整數的地址作為SendMessage的最后一個參數?!铫柙O置取值范圍(IPM_SETRANGE)★SendMessage (hIpEdit, IPM_SETRANGE, 0, 200<<8100);此語句將IP控件的第一部分的范圍限制為100~200。在IPM_SETRANGE消息中,Wparam指明要設置的字段, 而lparam的低16位字為該字段的范圍:高字節為上限,低字節為下限?!铫樵O置輸入焦點(IPM_SETFOCUS)★SendMessage(hIpEdit,IPM_SETFOCUS,3,0);//將輸入焦點設在IP控件的第四部分。㈥判定IP串是否為空(IPM_ISBLANK)if(!SendMessage(hIpEdit,IPM_ISBLANK,0,0))
{
//IP控件中的IP串為空
}
else
{
//IP控件中的IP串至少有一部分不是空的
}
●IP控件的通知消息●當IP串被改動后或者輸入焦點發生了轉移,IP控件就會向它的父窗口發送通知消息IPN_FIELDCHANGED。在大多數情況下,我們都可以忽略此通知消息。以下是處理通知消息IPN_FIELDCHANGED的一個示例:void __fastcall TForm1::WndPRoc(TMessage &Msg)
{
LPNMHDR p=(LPNMHDR)Msg.LParam;
if(Msg.Msg==WM_NOTIFY)
{
if(p->code==IPN_FIELDCHANGED)
{
//處理IP控件的IPN_FIELDCHANGED通知消息
}
}
TForm::WndProc(Msg);
}
新聞熱點
疑難解答