Ach so.
als für die linke spalte müsste das so sein:
Delphi-Quellcode:
for i:=0 to anz do
with panellinks do // hier musst du wenn du nur die namen hast findcomponent einsetzten, oder wenn es ein array ist, das array
begin
left:=r;
top:=(r+h)*i;
end;
Die rechte ist genau so einfach:
Delphi-Quellcode:
for i:=0 to anz do
with panelrechts do // hier musst du wenn du nur die namen hast findcomponent einsetzten, oder wenn es ein array ist, das array
begin
left:=2*r+w;
top:=(r+h)*i;
end;
Findcomponent geht so:
with TPanel(form1.Listbox1.FindComponent('PanelLinks'+inttostr(i))) do //mit form1.Listbox1 bin ich mir nicht so sicher, könnte auch form1. findcomponent sein
Das sucht nach dem Namen der Komponente, also du musst es entsprechnd benannt haben.
Ein Array ist aber natürlich viel besser, gerade wenn du es dynamisch erstellst.
Gruß Alexander