Listenindex überschreitet Maximum

[Orbmu2k]

hier dann auch ...

for q:= 25 to 39 do tcombobox(findcomponent('combobox'+inttostr(q))).text := List[q-1];