ScrollBox und FlowPanel richtig verknüpfen

[Der schöne Günther]

Das FlowPanel kommt nicht damit klar wenn es z.B. Align = alTop und AutoSize = True gleichzeitig hat. Beide bestimmen ja die Größe des Panels und beide kommen sich irgendwie in die Quere.

Des Rätsels Lösung ist im OnResize-Event des FlowPanels das AutoSize einmal abzuschalten, Realign() aufzurufen und es danach wieder einzuschalten:

Delphi-Quellcode:

procedure TForm1.FlowPanel1Resize(Sender: TObject);
begin
   FlowPanel1.AutoSize := False;
   try
      FlowPanel1.Realign();
   finally
      FlowPanel1.AutoSize := True;
   end;
end;

Das sieht dann so aus:
https://imgur.com/a/CxZJCZd