Вниз
Скачать: 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 вся ветка

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



Память: 0.46 MB
Время: 0.011 c
1-4503
Dmitry_mit
2002-11-20 20:01
2002.12.02
Кривая функция и var


1-4356
AndrewVolkov
2002-11-19 21:58
2002.12.02
UpCase(Char) есть ли у этой функции антоним???


1-4487
race1
2002-11-19 17:22
2002.12.02
paskal vs. w2k


3-4207
Antey
2002-11-13 16:10
2002.12.02
SQL- запрос


1-4477
котел
2002-11-20 13:26
2002.12.02
помощь




   Наверх