[Neftali [Germán.Estévez]]

Utilizando FindComponent puedes obtener un componente a partir de su nombre; En la ayuda de Delphi tienes el siguiente ejemplo:

Código Delphi [-]
var
  i: Integer;
const
  NamePrefix = 'MyEdit';
begin
  for i := 1 to 20 dobegin
    TEdit.Create(Self).Name := NamePrefix + IntToStr(i);
    with TEdit(FindComponent(NamePrefix + IntToStr(i))) do
    begin
      Left := 10;
      Top := i * 20;
      Parent := self;
    end;
  end;

Es casi idéntico al tuyo, simplemente que trabaja con TEdit, y la propiedad que modifica es otra, pero vamos es casi "pastado". Pruébalo y si tienes problemas ya dirás...