Fensterposition zurücksetzen

[DieDolly]

Zitat:

Gibt es MakeFullyVisible nur für die VCL? Nicht FMX?

Wenn das Fenster nicht sichtbar ist, setzt man es einfach auf den ersten Monitor. Dafür braucht man keine großartigen Funktionen mit tollen Namen, die es nur für VCL aber nicht FMX gibt.

Delphi-Quellcode:

if (Screen.MonitorFromWindow(AForm.Handle, mdNull) = nil) and (Screen.MonitorCount > 0) then
 begin
  // AForm.Top := (Screen.Monitors[0].Height - AForm.Height) div 2;
  // AForm.Left := (Screen.Monitors[0].Width - AForm.Width) div 2;
 end;

Und falls es MonitorFromWindow für FMX nicht gibt, dann haben die FMX-Leute eben Pech gehabt