13,822
社区成员
发帖
与我相关
我的任务
分享
void __fastcall TForm1::Button1Click(TObject *Sender)
{
HWND hWnd=::FindWindow (NULL,"计算器");
//DWORD style =-1778384896;
//SetWindowLong(hWnd, GWL_STYLE, -1778384896);
::SetWindowLong(hWnd, GWL_STYLE, ::GetWindowLong(hWnd, GWL_STYLE)
& (~WS_CAPTION) & (~WS_BORDER) & (~WS_DLGFRAME) | WS_POPUP);
::SetParent(hWnd,Form1->Handle);
}
::SetWindowLong(hWnd, GWL_STYLE, ::GetWindowLong(hWnd, GWL_STYLE)
& (~WS_CAPTION) & (~WS_BORDER) & (~WS_DLGFRAME) | WS_POPUP);