Seit
BDS gibts ja die schönen TGridpanel und TFlowpanel.
Zum ersteren habe ich eine klitzekleine Demo zusammengestellt. Die soll zeigen wie man einfach Panels (Rows) zur Laufzeit hinzufügt und löscht.
Wenn jemand eine elegantere Lösung für das Rowsizing Problem hat, hier wird euch zugehört
Delphi-Quellcode:
gp.RowCollection.BeginUpdate;
try
RI := gp.RowCollection.Add;
RI.SizeStyle := ssPercent;
// Ungeschickte Aufrechnung der Gridpanels übersteuern
For ii := 0 to gp.RowCollection.Count-1 do gp.RowCollection[ii].Value := 100 / gp.RowCollection.Count;
AddImage(gp);
AddLabel(gp);
finally
gp.RowCollection.EndUpdate;
end;