| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

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

Brack ©   (2005-07-02 19:15:00) 

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

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

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

---

BURN   (2005-07-02 20:48:00) [1]

1

---

Anatoly Podgoretsky   (2005-07-02 19:26:00) [2]

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

---

Radgar   (2005-07-02 19:21:00) [3]

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

---

Наверх