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

Edit1...Editx - как обратиться к нужному компоненту?   Найти похожие ветки 

← →
guest_Dmitry   (2003-11-09 07:31) [0]

На форме имеется порядка 40 Edit"ов.
Можно ли в цикле обратиться к нужному компоненту, напрмер
Edit[i].visible := false??
Заранее благодарен.

---

← →
Dmitry   (2003-11-09 08:04) [1]

Задай для удобства каждому едиту свойство Tag равное его номеру, по нему и будешь искать.
А дальше:

for i:=0 ComponentCount-1
do
if Components[i] is TEdit
then
if (Components[i] as TEdit).Tag="здесь нужный номер"
then
(Components[i] as TEdit).Visible:=False;


---

← →
Dmitry   (2003-11-09 08:06) [2]

P.S. А вобще в качестве параметра для поиска можешь использовать все что угодно: цвет, размеры, имя и т.д.

---

← →
Viktor Kushnir ©   (2003-11-09 08:12) [3]

Строку (Components[i] as TEdit). можно упростить до TEdit(Components[i]).

---

← →
Anatoly Podgoretsky ©   (2003-11-09 10:45) [4]

guest_Dmitry (09.11.03 07:31)
Что бы так обращаться требуется создать массив Edit

---

← →
guest_Dmitry   (2003-11-09 10:55) [5]

Спасибо всем.
Получилось как подсказал Viktor Kushnir:
TEdit(Components[i]).Visible := false

---

← →
Anatoly Podgoretsky ©   (2003-11-09 10:59) [6]

Чрезвычайно опасное решение, было же более менее безопасное (Components[i] as TEdit).

---

← →
guest_Dmitry   (2003-11-09 11:02) [7]

Чем грозит такое решение?

---

← →
Anatoly Podgoretsky ©   (2003-11-09 11:08) [8]

Многим, например крахом программы. Такое можно делать только в случае когда имеется твердая уверенность, что Components[i]) совместим с TEdit, то есть либо он сам либо наследник.

---

← →
guest_Dmitry   (2003-11-09 11:11) [9]

Ясно, попробую использовать другой вариант.

---

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

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



Память: 0.46 MB
Время: 0.014 c