如何捕捉单击任务栏产生的最小化(50分)

procedure WMSysCommand(var Msg:TMessage);message WM_SYSCOMMAND;
procedure TForm1.WMSysCommand(var Msg:TMessage);
begin
if (Msg.WParam = SC_MINIMIZE) then
CoolTrayIcon1.HideMainForm
else
inherited;
end;
捕捉不到任务栏最小化，只能捕捉最小化按钮产生的最小化

WM_SHOWWINDOW
LParam = SW_PARENTCLOSING

接受答案了.