Delphi World - Предохранить форму от сворачивания

Delphi World - это проект, являющийся сборником статей и малодокументированных возможностей по программированию в среде Delphi. Здесь вы найдёте работы по следующим категориям: delphi, delfi, borland, bds, дельфи, делфи, дэльфи, дэлфи, programming, example, программирование, исходные коды, code, исходники, source, sources, сорцы, сорсы, soft, programs, программы, and, how, delphiworld, базы данных, графика, игры, интернет, сети, компоненты, классы, мультимедиа, ос, железо, программа, интерфейс, рабочий стол, синтаксис, технологии, файловая система...

Предохранить форму от сворачивания

Оформил: DeeCo
Автор: http://www.swissdelphicenter.ch

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;