Форум: "Основная";
Текущий архив: 2002.07.25;
Скачать: [xml.tar.bz2];
ВнизМассив элементов управления Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.006 c