Скачать: CL | DM;

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

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

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

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.007 c