System Delphi

Title: prevent Windows from minimizing a Form?
The Windows Taskbar function "Minimize all Windows" minimizes all Windows even if they don't have a minimize button.
The following code will prevent a form from minimizing through windows.
Die Funktion "Alle Fenster minimieren" aus der Windows Taskbar minimiert alle Fenster, auch solche die eigentlich keine Minimieren-Schaltfl che besitzen. Der folgende Code verhindert das Minimieren eines Fensters.
implementation
procedure TForm1.WMShowWindow(var Msg: TWMShowWindow);
begin
if not Msg.Show then
Msg.Result := 0
else
inherited;
end;