Einzelnen Beitrag anzeigen

Benutzerbild von Flocke
Flocke

Registriert seit: 9. Jun 2005
Ort: Unna
1.172 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#3

Re: Gesamtbreite der Mainmenüs

  Alt 16. Aug 2006, 13:46
Versuch's mal mit dem Handle.

(ungetestet)
Delphi-Quellcode:
// var R: TRect;
with Application.MainForm do
  GetMenuItemRect(Handle, Menu.Handle, GetMenuItemCount(Menu.Handle) - 1, R);
Danach steht in R.Right der rechte Rand des letzten Elements in Bildschirmkoordinaten - dies ist gleichzeitig der linke Rand des nicht benutzten Bereichs.
Volker
Besucht meine Garage
Aktuell: RtfLabel 1.3d, PrintToFile 1.4
  Mit Zitat antworten Zitat