Jegliches Minimieren abfangen

[NicoDE]

versuchs mit

Delphi-Quellcode:

procedure TF_shuttimer.WMSysCommand(var Message: TWMSysCommand);
begin
  if SC_MINIMIZE = (Message.CmdType and $FFF0) then
     ShowMessage('foo');
end;