怎么设置他的字体大小？

[yingying0808]

BCB没有IP的输入框组件，用CreateWindow生成，当他的字体和窗体的其他组件的字体不协调，怎么设置他的字体？

HWND IPHwd;
void __fastcall TFrmMain::CreateIPControl( HWND ParentHwnd )
{
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
24, //Height
ParentHwnd, //这个是父窗口的句柄
0,
0,
0);
ShowWindow( IPHwd, SW_SHOW );
}
}

[netsys2]

妹妹，我也想知道。。。

[chifengwatch]

唉，弄了一中午也没搞定：（
才疏学浅，只能帮你UP了

[chifengwatch]

//帮人帮到底，假设你在窗体上有一个设置了字体的Edit
//我相信还有其他的办法，不过我没找到
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
120, //Width
19, //Height
ParentHwnd, //这个是父窗口的句柄
0,
0,
0);

SendMessage (IPHwd, WM_SETFONT, SendMessage (Edit1->Handle, WM_GETFONT, 0, 0), 0) ;
ShowWindow( IPHwd, SW_SHOW );
}

[梦回童年001]

UP

[yingying0808]

up

[chifengwatch]

同意 netsys2(来电)

[yingying0808]

可以了，谢谢！