Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];




Вниз

Как пробежаться по всем елементам на форме 


besen-ok   (2002-04-17 11:44) [0]

Собственно интересует сабж ... а именно надо пройтись по всем елементам на форме и поменять свойства Visiable или Enabled и элементов с определенным значением поле Tag ... Т.е. как мне устроить цикл по помпонетам, для которых родителем является какая-то форма (TForm) или панель (TPanel) ???



Starkom   (2002-04-17 11:49) [1]

for i:=0 to ComponentsCount-1 do
if TObject(Components[i]).ClassName<>"TPanel" ("TTabSheet" либо еще что-то, в зависимости от задач)
then Components[i].Visible:=false
else вложенный цикл по Components



besen-ok   (2002-04-17 11:50) [2]

ComponentsCount - эта переменная откуда ....
И еще извини .... немного не понял как это сделать для определенного родителя ?



besen-ok   (2002-04-17 11:54) [3]

Сорри все разобрался ! Вопрос снимается !




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];




Наверх







Память: 0.74 MB
Время: 0.029 c
1-94510           petyun                2002-04-15 14:12  2002.04.29  
HexToBin


1-94418           Stan Orlov            2002-04-18 09:06  2002.04.29  
Как выделить весь текст в RichEdit или Memo?


14-94549          Nest                  2002-03-21 14:42  2002.04.29  
Как сделать недоступными некоторые items в TListBox? Или есть другой компонент с такой фичей?


1-94399           Ezh                   2002-04-06 12:11  2002.04.29  
Из Экселя в СтрингГрид


7-94590           Varfolomey            2002-01-20 20:29  2002.04.29  
RS232 - контроль чётности, что делать?