Hallo,
ich wende den Code unten an, um mein Programm an den Bildschirm anzupassen.Dabei habe vollgendes Problem, mein Hauptimage geht von oben bis unten zur Taskleiste(siehe Bild unter normaler Auflösung), aber wenn ich eine andere Aufösung nehme, ist das Image immer sehr weit weg von der Taskleiste.
Gibt es da einen code, bzw eine Einstellung die dass automatisch anpasst?
Dies ist eigentlich mein Hauptproblem,mein 2 kleiners ist der sache sehr ähnlich und zwargeht um den Pfeil der rechts endet? dieser findet auch keinen Abschluss mit der rechten Bildecke, wie im Bild unter normaler Auflösung.
Ok, danke für eure Hilfe
Delphi-Quellcode:
begin
schrift := pixelsperinch-96;
if screen.width>breite then begin
if schrift>0 then {für große Schriften}
ScaleBy(round(((screen.width/breite)*100)-((screen.width/breite-1)*100)),100)
else
{für kleine Schriften} ScaleBy(round(((screen.width/breite)*100)),100);
end
else begin
if screen.width=breite then
ScaleBy(round(((screen.width/breite)*100)-schrift),100)
else begin
if schrift>0 then
{für große Schriften} ScaleBy(round((100-(breite/screen.width-1)*100)-(breite/screen.width-1)*100),100)
else
{für kleine Schriften} ScaleBy(round((100-(breite/screen.width-1)*100)),100);
end;
end;