[Casimiro Notevi]

Haz una búsqueda por FindComponent, aunque es algo más o menos así:

Código Delphi [-]
for i := 1 to 10 do 
  TEdit(FindComponent('Edit'+IntToStr(i))).Text := 'loquesea';