Здаровки!!!

)
На форме есть большое количество компонентов TPanel и требуется изменить какое-либо свойство всех или нескольких компонентов.
Хотелось бы примерно следующее:
Код:
for i:=1 to 40 do
begin
panel+i.color:=clBlack; // Естественно это не работает.
end;
Может быть есть в делфи какая-нибудь функция?