Einzelnen Beitrag anzeigen

BigAl

Registriert seit: 6. Sep 2008
Ort: Kehl
504 Beiträge
 
Delphi 12 Athens
 
#3

AW: TScrollBox dynamischer Inhalt

  Alt 16. Mär 2022, 12:32
Setze bei dem Frame das Align auf alNone. Dann fügst du folgenden Code im OnResize Event der ScrollBox ein:
Delphi-Quellcode:
var
  H: Integer;
  W: Integer;
begin
  W := Max(MyFrame.Constraints.MinWidth, MyScrollBox.ClientWidth);
  H := Max(MyFrame.Constraints.MinHeight, MyScrollBox.ClientHeight);
  MyFrame.SetBounds(0, 0, W, H);
end;
Klingt logisch . So ähnlich mache ich das schon in einer anderen Applikation. Da hatte ich jetzt nicht mehr dran gedacht.

Aber: Ich darf im Frame nicht die Constraints verwenden, da diese mir ja wieder die ScrollBox in ihrer Mindestgröße limitieren...
Update: Ne, geht trotzdem

Vielen Dank Uwe!
Man sollte nie so viel zu tun haben, dass man zum Nachdenken keine Zeit mehr hat. (G.C. Lichtenberg)

Geändert von BigAl (16. Mär 2022 um 12:43 Uhr)
  Mit Zitat antworten Zitat