Mainform minimieren aber Unterform stehen lassen

[Hobbycoder]

Very quick and dirty.

Mittels dieser Procedure

Delphi-Quellcode:

procedure SetAsMainForm(aForm:TForm);
var
   P:Pointer;
begin
   P := @Application.Mainform;
   Pointer(P^) := aForm;
end;

mache ich meine AppBarform zur Main und später wieder zurück. Klappt gut. Man muss nur bei den Aufräumarbeiten und so halt das ganze berücksichtigen.