Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 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
7-81500
ProNix
2002-05-08 18:01
2002.07.25
Нужен регистратор клавиш


6-81395
demona
2002-05-15 17:25
2002.07.25
Как можно отслеживать и передавать сообщение через netsend


14-81426
Дядя Будда
2002-06-27 13:18
2002.07.25
Нужен компонент


4-81510
UniNik
2002-05-20 10:43
2002.07.25
Проблема с 98...


1-81292
EugenCFG
2002-07-11 21:16
2002.07.25
Изменив размер кнопоки, все остальные кнопки стали не стандар...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский