若打开别的程序，最小化本程序窗体，请问如何实现？

[riveitang]

打开别的程序时候，如何最小化本程序窗体？我的做法如下(未成功)：

我用到的是WM_ACTIVE消息，在要最小化的程序代码中，加个该消息处理．想法：打开某个程序时候，会发送WM_ACTIVE消息，

VCL_MESSAGE_HANDLER(WM_ACTIVATE, TMessage, OnFormMin)


void __fastcall OnFormMin(TMessage &AMessage);


void __fastcall TfrmXXX::OnFormMin(TMessage &AMessage)
{
//HINSTANCE hHandle = GetActiveWindow();
HINSTANCE hHandle = GetFocus();
hfrmMain = frmMain->Handle;
if(hHandle != hfrmMain)
// if(hHandle != this->Handle)
{
this->WindowState = wsMinimized;
}
else
{
this->WindowState = wsMaximized;
}
}

请高手指点，

[CamelFang]

打开别的程序时,本程序不会收到WM_ACTIVE消息啊.
你是要在本程序中去打开别的程序吗?那样的话,CreateProcess之后直接Application->Minimize()就OK.
如果是要监视系统创建的新进程,那就得用到Hook了.