Hallo,
ich habe 20 Panels in einer ScrollBox. Die Panels haben alle verschiedene Farben. Jetzt möchte ich die Panels alle in der selben Farbe haben. Damit ich nicht jedes Panel einzeln ansprechen muss, habe ich mir folgendes überlegt.
Delphi-Quellcode:
for j:=0 to Form1.ComponentCount do
begin
p:=FindComponent('P' + IntToStr(j + 1)) as TPanel;
if p is TPanel then
begin
p.Color:=clBtnFace;
end;
end;
Leider funktioniert es mal wieder nicht. Was habe ich falsch gemacht??? Die Panels erzeuge ich Dynamisch und gebe den Panels auch bei der erzeugung Namen. Die Panels heißen P1, P2, ..., P20
Vielen Dank im vorraus
MFG Christian18