Скачать: CL | DM;

Как програмно вывести 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;

---

← →
BURN ©   (2005-07-02 20:48) [3]

1

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.024 c