Текущий архив: 2002.07.25;
Скачать: CL | DM;

Вниз

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

← →
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;

---

← →
SPeller ©   (2002-07-13 15:48) [3]

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;

---

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

Текущий архив: 2002.07.25;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.009 c