private
procedure WMSysCommand(var Msg:TMessage);message WM_SYSCOMMAND;
procedure TForm1.WMSysCommand(var Msg: TMessage);
begin
case Msg.WParam of
SC_MINIMIZE : ShowMessage('最小化');
SC_MAXIMIZE : ShowMessage('最大化');
end;
inherited;
end;
任务栏中‘最大化’,‘最小化’,‘关闭’ 菜单的消息该如何拦截啊?
任务栏中的消息要用Application.OnMessage来截获