|
Registriert seit: 21. Mär 2009
Ort: Rödinghausen
301 Beiträge
Delphi 10.4 Sydney
|
AW: Fenstergröße anpassen?
6. Apr 2017, 16:23
Hallo Lebermatt,
neben dem Hinweis das im OnResize zu erledigen, musst Du den berechneten Wert auch noch der Breite (Form.Width) zuweisen.
Form.Width := ROUND(Form.Height * 1.3);
Außerdem kannst Du die Form, z. B. mit der Maus, dann nur noch in der Höhe ändern. Wenn Du die Breite mit der Maus ziehst, schlägt OnResize wieder zu und passt die Breite wieder auf das vorgegebene Verhältnis an.
Gruß
Rolf wenn nicht anders angegeben, schreibe ich zu D7, XE2 und MS SQL - ansonsten fragen Sie ihren Administrator oder einen Operator. Update 06/2020: Delphi 10.4 Sydney 
|