Supongo que te refieres a que creas varios componentes utilizando la misma referencia (si no así Roman tiene razón...):
Código Delphi
[-]
var
Edit:tEdit;
begin
...
for i := 0 to 10 do begin
Edit := TEdit.Create(...);
...
Edit.Name := '???';
end;
Para obtener componentes con FindComponent necesitas tener el nombre y como comprobación adicional utilizar el operador IS. Algo así podría ser un ejemplo:
Código Delphi
[-]
var
Edit:tEdit;
i:Integer;
comp:TComponent;
begin
...
for i := 0 to 10 do begin
Name := 'Edit' + IntToStr(i); comp := FindComponent(Name);
if Assigned(comp) then begin
if (comp is TEdit) then begin
TEdit(comp).Text := 'Encontrado';
TEdit(comp).Color := clGray;
end;
end;
end;
NOTA: En la ayuda de Delphi tienes algun eemplo más del FindComponent:
NOTA: Te he puesto el código de memoria (no lo he compilado), así que tal vez tenga algun error de sintaxis.