Es gibt mehrere Möglichkeiten:
- Durch das Controls-Array iterieren und wenn das aktuelle Control ein Panel ist, färben
....
Ja, aber wenn er es bereits vergeblich (weil grundlegend fälschlich) dadurch versucht hat, "ein Integer mit einem "&" anzuhängen (Kenntnisse von TI-Basic)", dann wird er diese Empfehlung vermutlich ohne konkrete Anleitung nicht in funktionierenden Delphi-Code umsetzen können.
Code:
procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
begin
for i:= 0 to ComponentCount - 1 do
if (Components[i] is TPanel) then (Components[i] as TPanel).color:=clBlue;
end;