Minimieren Sie nicht sekundäre Formen


Dieser Artikel beschreibt, wie man stoppt alle Formen in einer Delphi-Anwendung von minimieren, wenn das Hauptformular minimiert.
Für jedes Kind-Formular, das Sie sichtbar bleiben wollen, dies tun
Typ
TSomeForm = class(TForm)
geschützt
Verfahren CreateParams (Var Params: TCreateParams); außer Kraft setzen;
Ende;
Umsetzung
Procedure TSomeForm.CreateParams (Var Params: TCreateParams);
beginnen
geerbte CreateParams(Params);
Params.WndParent: = GetDesktopWindow;
Ende;









Minimieren Sie nicht sekundäre Formen


Minimieren Sie nicht sekundäre Formen : Mehreren tausend Tipps, um Ihr Leben einfacher machen.


Dieser Artikel beschreibt, wie man stoppt alle Formen in einer Delphi-Anwendung von minimieren, wenn das Hauptformular minimiert.
Für jedes Kind-Formular, das Sie sichtbar bleiben wollen, dies tun
Typ
TSomeForm = class(TForm)
geschützt
Verfahren CreateParams (Var Params: TCreateParams); außer Kraft setzen;
Ende;
Umsetzung
Procedure TSomeForm.CreateParams (Var Params: TCreateParams);
beginnen
geerbte CreateParams(Params);
Params.WndParent: = GetDesktopWindow;
Ende;


Minimieren Sie nicht sekundäre Formen

Minimieren Sie nicht sekundäre Formen : Mehreren tausend Tipps, um Ihr Leben einfacher machen.
Freunden empfehlen
  • gplus
  • pinterest

Kürzliche Posts

Kommentar

Einen Kommentar hinterlassen

Wertung