[joker7438]

Спасибо, эт тож как вариант))) я зделал так)))))))))
сначала

y:=100;

r[i]:= Tedit.Create(nil);
r[i].Text:= 'edit' + IntToStr(i);
r[i].ShowHint := true;
r[i].Left:=10;
r[i].Top:=y;
y:=y+30;
r[i].Parent :=form1;

))))спасибо за помощ!