Компоненты в Delphi.

[Chudo4258]

Подскажите как можно реализовать такую ситуацию:
допустим я в Edit ввожу некоторое число и по нажития на кнопку у меня должно на форме появилось столько Label-ов какое число ввел в Edit-е (каждый Label заполнен некоторой информацией)???

[Levsha100]

А не легче использовать Memo ?

[Chudo4258]

Нет. А допустим если надо создать столько Edit-ов, какое число введено в Edit1.

n:=StrToInt(Edit1.Text);

Короче создать n некоторых компонент. (Например: Label, Edit, Button...)

[Sazary]

Пример:

procedure TForm1.Button1Click(Sender: TObject);
const L = 100;
var i,n : integer;
mas : array[1..50] of TLabel;
begin
n := StrToInt(Edit1.Text);
for i:=1 to n do
 begin
 mas[i] := TLabel.Create(self);
 mas[i].Parent := self;
 mas[i].Left := L;
 mas[i].Top := i*30;
 mas[i].Visible := true;
 mas[i].Width := 100;
 mas[i].Caption := 'Label '+IntToStr(i);
 end;

[Chudo4258]

Sazary, спасибо.