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

← →
Macuca (2002-07-13 15:14) [0]

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

← →
MBo © (2002-07-13 15:31) [1]

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

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

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

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

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;

Массив элементов управления Найти похожие ветки