Kennt jemand eine Komponente von Drittanbietern, die wie GTSizer funktioniert? Es scheint, dass GenoTechs nicht mehr existiert. Wir haben eine Reihe von Formularen in unserer Delphi/Oracle-Unternehmensanwendung mit der GTSizer-Komponente. Wir haben Delphi 2009 zu installieren, aber GTSizer ist nicht kompatibel, also halten wir uns vorerst zurück. Alle Vorschläge sind willkommen.GenoTechs GTSizer Komponente
Antwort
Ich habe dieses verwendet;
procedure ScaleForm(F: TForm; ScreenWidth, ScreenHeight: LongInt) ;
begin
F.Scaled := True;
F.AutoScroll := False;
F.Position := poScreenCenter;
F.Font.Name := 'Arial';
if (Screen.Width <> ScreenWidth) then begin
F.Height :=
LongInt(F.Height) * LongInt(Screen.Height)
div ScreenHeight;
F.Width :=
LongInt(F.Width) * LongInt(Screen.Width)
div ScreenWidth;
F.ScaleBy(Screen.Width,ScreenWidth) ;
end;
end;
Quelle: About.com, Zarko Gajic
Link zum Artikel: http://delphi.about.com/od/standards/a/aa030700a.htm –
Vielleicht tut, was Sie brauchen. OTOH, es könnte ein großer Overkill sein. :)
ich Anker und Ausrichtgittern zu handhaben, Memos, usw., wie GenoTechs zeigt in ihrer animated example.
Ich war noch nie ein Fan von Ändern der Größe der Schaltfläche und Bearbeiten von Steuerelementen und deren Schriftarten basierend auf der Größe des Fensters. GTSizer demo.
Ich stimme dir zu Bruce, ich mache das auch. –
Ich benutze elastic forms, aber sie haben es nicht für D2009 aktualisiert und ich habe es noch nicht auf D2009 getestet.
Können Sie näher erläutern, was GTSizer macht/tat? – robsoft
Automatische Auflösungsunabhängigkeit zwischen 640x480 und 1280x1024. Stellt sicher, dass Ihre Formulare zur Laufzeit unabhängig von der Laufzeitauflösung praktisch gleich groß sind. Ermöglicht dem Benutzer, die Breite und Höhe gleichzeitig zu ändern, während Beschriftungen in der Nähe ihrer Bearbeitungsfelder bleiben. Mehr unter http://www.genotechs.com/gtsizer.html. Website existiert aber E-Mail und Telefonnummern nicht. Einige dieser Probleme werden in neueren Versionen von Delphi besser behandelt, aber wir haben unverändert alten Code aus Delphi 5. – Stewart