Componentcount

[hogol]

Hola buenas

Estoy intentando modificar todos los Tedit que tengo metidos en un Tpanel usando la propiedad componentcount del Tpanel, pero la cosa no funciona.
En concreto quiero hacer esto:

FOR I:=0 TO panel1.ComponentCount-1
DO BEGIN
IF (panel1.COMPONENTS[i] IS TEDIT)
THEN BEGIN
TD:=panel1.COMPONENTS[i] AS TEDIT;
TD.readonly := True;
TD.Color := clsilver;
END;
end;
end;

Pero... no funciona. Componentcount vale 0. Alguien sabe qué es lo que hago mal?

Saludos y gracias
Hogol