Home » Tipps & Tricks » Komponenten » TForm » Minimieren verhindern

Minimieren verhindern

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.

private 
 procedure WMShowWindow(var Msg: TWMSysCommand);message WM_SYSCOMMAND; 

{...} 

implementation 
{...} 

procedure TForm1.WMShowWindow(var Msg: TWMShowWindow); 
begin 
 if not Msg.Show then 
   Msg.Result := 0 
 else 
   inherited; 
end;