Cómo hacer un Array de Componentes

var
  EditArray : Array [1..20] of TEdit;

procedure TForm1.FrmCreate(Sender: TObject);
var
   n : integer;
begin
   for n := Low(EditArray) to High(EditArray) do begin
      EditArray[n] := TEdit.Create(self);
      with EditArray[n] do begin
         parent := self
         width := 121;
         left  := 16;
         top := 60 + n*24;
         text := '';
         //  agregar aquí otras propiedades si necesario
      end;
   end;
end;