[edusus]

Perdón me había olvidado de mandar el código:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  N: integer; 
  MiEdit: array[1..10] of TEdit;
begin
  N:= 1;
  X:=20;
  Repeat
  begin
    MiEdit[N] := TEdit.Create(Self);
    MiEdit[N].Parent := Self;
    MiEdit[N].Width:= 150;
    miedit[N].Left:= 60;
    miedit[N].Top:= X;
    N:= N + 1;
    X:= X + 25;
  end;
  until N = 10;
end;