ok, disculpen, estoy de acuerdo con ustedes, solo falto mencionarles que no necesariamente tengo que aplicar la propiedad a todos, eso depende si cumple una condicion, es decir:
while comparar < 200 do
begin
if comparar=condicion then //Comparo si el numero es igual a una condicion
TShape(Components[comparar]).brush.Color:=ClGreen; { Si es igual entonces que cambie el shape con el numero de cuerdo a la variable comparar}
comparar:=comparar+1;
end;
O sea que si comparar=58 y cumple con la condicion entonces cambiara un shape, pero y el shape se llama NOM58 que coincidiria con el valor de comparar, un poco revoltoso pero es necesario
, es por eso q aclaraba lo del nombre