![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как пробежаться по всем елементам на форме
besen-ok © (2002-04-17 11:44:00)Собственно интересует сабж ... а именно надо пройтись по всем елементам на форме и поменять свойства Visiable или Enabled и элементов с определенным значением поле Tag ... Т.е. как мне устроить цикл по помпонетам, для которых родителем является какая-то форма (TForm) или панель (TPanel) ???
besen-ok (2002-04-17 11:54:00) [1]Сорри все разобрался ! Вопрос снимается !
besen-ok (2002-04-17 11:50:00) [2]ComponentsCount - эта переменная откуда ....
И еще извини .... немного не понял как это сделать для определенного родителя ?
Starkom (2002-04-17 11:49:00) [3]for i:=0 to ComponentsCount-1 do
if TObject(Components[i]).ClassName<>"TPanel" ("TTabSheet" либо еще что-то, в зависимости от задач)
then Components[i].Visible:=false
else вложенный цикл по Components