Formular skalieren???

[romber]

Hallo!

Ich habe mein kleines Programm unter Auflösung 1024x768 entwickelt. Wenn ich die Anwendung unter 800x600 oder niedriger starte, passt die gesamte Form selbstveständlich nicht auf den Bildschirm. Gibt es eine Möglichkeit, den Formular und alle Komponenten auf die aktuelle Auflösung zu skalieren oder sind die Scrollleisten die einzige Möglichkeit?

[alcaeus]

Sieh dir mal die Align bzw. Anchor-Eigenschaften der Komponenten an. Evtl. entwickelst du die Anwendung für 800x600, außer wenn es wirklich unmöglich ist.

Greetz
alcaeus

[Markus K.]

Hallo romber,
so müsstest du das Formular skalieren können (Code ist ungetestet).

Delphi-Quellcode:

const ScreenHeight={Auflösung der y-Achse};
      ScreenWidth={Auflösung der x-Achse};
var x,y:Integer;
begin
     Scaled:=True;
     x:=Screen.Width;
     y:=Screen.Height;
     if (y <> ScreenHeight) or (x <> ScreenWidth)
     then begin
          Form.Height:=((Form.ClientHeight*y) div ScreenHeight)+Form.Height-Form.ClientHeight;
          Form.Width:=((Form.ClientWidth*x) div ScreenWidth)+Form.Width-Form.ClientWidth;
          ScaleBy(x,ScreenWidth);
          end;
end;

Tschüß Markus