Текущий архив: 2002.12.02;
Скачать: CL | DM;

Вниз

Controls   Найти похожие ветки 

← →
yong   (2002-11-21 12:43) [0]

Подскажите, плиз, как пробежаться по всем контролам на форме и определить, которые из них имеют тип Edit?

---

← →
Skier ©   (2002-11-21 12:45) [1]

>yong
for ii := 0 to ControlCount - 1 do begin
if Control[ii] is TEdit then ShowMessage("I am TEdit");
end; //for

---

← →
iLover   (2002-11-21 12:45) [2]

используй Tag

---

← →
Skier ©   (2002-11-21 12:47) [3]

>yong
Ойк !
if Control s[ii] is TEdit then ShowMessage("I am TEdit");

---

← →
yong   (2002-11-21 12:56) [4]

> Skier © (21.11.02 12:47)

Спасибо



> iLover (21.11.02 12:45)

Тэг у меня уже занят

---

← →
Товарищ   (2002-11-21 13:03) [5]

Можно использовать TComponent

---

← →
Юрий Федоров ©   (2002-11-21 13:22) [6]

Если использовать Controls, то в список не попадут например Edit"ы, лежащие на TPanel, в случае Components попадут все.
Так что выбирай, что именно нужно

---

← →
yong   (2002-11-21 13:49) [7]

А как использовать TComponent

---

← →
Skier ©   (2002-11-21 13:55) [8]

for ii := 0 to ComponentCount - 1 do begin
if Components[ii] is TEdit then ShowMessage("I am TEdit");
end; //for

---

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

Текущий архив: 2002.12.02;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.018 c