Firemonkey OSX Titelzeile ausblenden

[Harry Stahl]

Hier reicht es schon, dass Du Borderstyle der Form auf None setzt.

Die Anfangsposition für Left und top kannst Du ja z.B. auf 100,100 setzen (oder Formposition auf Screencenter).

Oben in der Form legst Du halt ein TPanel hin, beim MouseDown-Event verwendest Du folgendes:

Delphi-Quellcode:

procedure TForm28.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Single);
begin
  Self.StartWindowDrag;
end;

Damit kannst Du dann die Form wie sonst auch verschieben. Das funktioniert auf beiden Plattformen (Windows und MAC OS X).

Den fehlenden Schatten der Form kannst Du (so ungefähr) nachahmen, indem Du ein Panel (Align=Client) in Deine Form legst, da ein Shadoweffekt verwendest und für das Panel die Margins auf ca. 15 Pixel setzt. Du musst ein wenig mit den Einstellungswerten für den Shadoweffect spielen, um es passend zu bekommen (Beispiel siehe Screenshot).