Hallo,
ich habe mein Programm mit 96DPI erstellt. Angewendet wird es u.a. bei 120DPI.
Scaled der Form1 ist auf False, die manuelle Skalierung mache ich mit:
Delphi-Quelltext
1: 2: 3: 4: 5: 6:
| if Screen.PixelsPerInch <> PixelsPerInch then begin ScaleBy(Screen.PixelsPerInch, PixelsPerInch); Ribbon1.ScaleBy(Screen.PixelsPerInch, PixelsPerInch); statusbar1.ScaleBy(Screen.PixelsPerInch, PixelsPerInch); end; |
Die Form und die statusbar1 werden damit korrekt skaliert. Nur das Ribbon Menü scheint die Angabe komplett zu ignorieren.
Weiß jemand, woran das liegen könnte?
Ich verwende Delphi XE.