[joker7438]

Доброго времени суток=) короче вопрос такой, я создаю динамически компонент (edit) каждый следующий должен перемещатся на n вниз вот я пишу:

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

но ничего не перемещается...подскажите чтото????

[lmikle]

Код:

r[i].Top := r[i].Top + I*100;

если n = 100. Я бы для тестов поставил бы n = 24. Это раз.
Два. вообще, компонент олбычно создается по координатам 0,0. Поэтому "танцевать" от начальной позиции компонента бессмысленно.
Лучше сделать так:

Код:

r[i].Top := 8 + I*24; 

Здесь первое значение I = 0, если оно = 1, то (I-1) * 24.
тогда первый компонент будет по высоте на 8 пикселах, второй - на 32, третий на 56 и т.д.

[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;

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