Динамическое создание Edit

[Лёшка228]

Здраствуйте,помогите сделать так for i:=1 to n do и на надо создать n количество TEdit в ряд,как это организовать?=)

[raxp]

создайте их динамически, причем положение dynedit.left:= i*dynedit.width

[Volt]

procedure TForm1.Button1Click(Sender: TObject);
var i,n:integer;   edites:tedit;
begin
n:=4;

for i:=1 to n do
begin
edites:=tedit.Create(owner);
  edites.Top:=100;
  edites.Left:=i*150;
  edites.Height:= 50;
  edites.Width:=100;
  form1.InsertControl(edites);
end;

end;

[Лёшка228]

Спасибо большое,помогло!