Как програмно вывести N обьектов

← →
Brack (2005-07-02 19:15) [0]

Подскажите пожалуйста, вот к примеру создаю в ходе работы программы новый визуальный компонент, предварительно указав его тип:

var
new:tlabel;
...
new:=tlink.Create(panel);
new.Top:=30;
new.Left:=20;
new.Name:="new";
new.Parent:=panel;

Все прекрасно работает, только вот если мне надо создать не один а 50 или 100 обьектов? Как можно это сделать?

← →
Radgar © (2005-07-02 19:21) [1]

var new:array[1..50] of Tlabel; ... new[1]:=... new[2]:=...

← →
Anatoly Podgoretsky © (2005-07-02 19:26) [2]

For I := 1 to 50 do begin ... end;

Как програмно вывести N обьектов Найти похожие ветки