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

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

Массив элементов управления [D6]

Macuca ©   (2002-07-13 15:14:00) 

Расскажите мне пожалуйста, можно ли в Delphi создавать массивы элементов управления по типу Vbasic"а

---

SPeller   (2002-07-13 15:48:00) [1]

for i:=0 to 11 do
for j:=0 to 11 do begin
apanels[j,i]:=tmypanel.Create(pnParent1);
apanels[j,i].Top:=(i-1)*17;
apanels[j,i].Left:=(j-1)*17;
apanels[j,i].Position:=cell(j,i);
apanels[j,i].Font.Style:=[fsBold];
apanels[j,i].Font.Height:=5;
apanels[j,i].Font.Name:="Marlett";
apanels[j,i].Parent:=pnParent1;
apanels[j,i].Visible:=iif((i>0)and(i<11)and(j>0)and(j<11),true,false);
if (i>0)and(i<11)and(j>0)and(j<11) then
apanels[j,i].OnMouseMove:=pnParent1MouseMove;
apanels[j,i].OnMouseUp:=pnParent1MouseUp;
apanels[j,i].Ctl3D:=false;
end;

---

Юрий Зотов   (2002-07-13 15:39:00) [2]

А кто мешает? Тип элемента массива может быть любым, его никто не ограничивает.

var
MyButtons: array[0..9] of TButton;
MyControls: array of TControl;

---

MBo   (2002-07-13 15:31:00) [3]

Я не знаю, как сделано в Vbasic, но в Дельфи можно.

---

Наверх