Zitat von
oki:
@MrKnogge: dann aber so
Delphi-Quellcode:
with TPanel(FindComponent(P + IntToStr(i+1))) do
Color:=clBtnFace;
Da hat mich wohl einer bei copy & paste erwischt.
Was das array angeht, er meint wenn du deine Panels so deklarieren würdest:
P[1..20]: array pf TPanel:
Könntest du sie geütlich in einer Schlaife durchlaufen um die Farbe zu ändern.
Delphi-Quellcode:
for i := 0 to 19 do
P[i+1].Color := ...