604
社区成员
发帖
与我相关
我的任务
分享
void __fastcall TForm1::Button1Click(TObject *Sender)
{
char ip[16];
GetWindowText( IPHwd, ip , 16 );
ShowMessage(ip);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
INITCOMMONCONTROLSEX CommCtrl;
CommCtrl.dwSize = sizeof(CommCtrl);
CommCtrl.dwICC = ICC_INTERNET_CLASSES;//指定Class
if( InitCommonControlsEx( &CommCtrl ) )
{
IPHwd = CreateWindow( TEXT("SysIPAddress32"),
TEXT("IPADDR2"),
WS_CHILD | WS_TABSTOP | WS_GROUP,
160, //Left
72, //Top
130, //Width
20, //Height
Form1->Handle, //这个是父窗口的句柄
0,
0,
0);
ShowWindow( IPHwd, SW_SHOW );
TEdit * EditTmp =new TEdit(this);
EditTmp->Parent=Form1;
SendMessage (IPHwd, WM_SETFONT, SendMessage (EditTmp->Handle, WM_GETFONT, 0, 0), 0) ;
delete EditTmp;
}
}