Bildschirm(auflösungs)abhängigkeit

[Meisterschmied]

Hi Leute,

hab ein kleines Problem mit einem Programm, was ich gerad schreibe. Und zwar sollen sich bei jeder Bildschirmgröße der Inhalt (also die ganzen Panel und Images etc.) exakt im Gleichen Mass anpassen. Jetzt kann ich zwar zu jedem Button und Panel schreiben

Prop := round(1024/Form1.Width);

with Button1 do begin

Top := round(Top / Prop);
Left:= round(Left/ Prop);
Width := round(Width/ Prop);
Height:= round(Height / Prop);
Font.Height := round(Font.Height / Prop);

end;

aber das ist vielleicht a bissl aufwendig, wenn man das für was weiss ich wie viele Buttons und Panels / Images / Labels u.s.w. machen muss. Is außerdem nicht gerade schöner Code. Hat jemand eine bessere Lösung dieses Problem. Bestimmt, denn das ist das erste große Programm, was ich schreibe (für den Rest reicht ja, dass es auf dem heimischen PC funktioniert )

Wäre um Hilfe dankbar

Meisterschmied

Ich merk gerad, war falsches Forum. Jetzt hab ich natürlich keine Ahnung, wie ich den ins andere bringe. Na, is jetzt auch egal, vergebts mir, kommt nich wieder vor...

[edit=r_kerber]Nach Programmieren allgemein verschoben! Mfg, r_kerber[/edit]

[Tom]

Anpassung an andere Bildschirmauflösungen und Schriftgrößen.
Den Rest bei Bedarf in OnResize.

[Meisterschmied]

Danke, hat sehr geholfen ;