Подстановка

← →
kirill2000 (2002-02-23 15:16) [0]

Подскажите пожайлуста, как можно обращаться к элементам на форме не по их названию, а по их индексу. Например. у меня 20 DBEdit на форме. Могу ли я их обнулить не обращаясь к каждому по названию, а в цикле, т.е. подставляя их порядковый номер.

← →
Vitaly Nevzorov (2002-02-23 16:10) [1]

Конечно, если у Вас DBedit1..20 то вот обращение в цикле:

For i:=1 to 20 do
showmessage((FindComponent("DBEdit"+inttostr(i)) as TDBEdit).text)

← →
Набережных С. (2002-02-23 16:18) [2]

n:=ControlCount;
while n > 0 do
begin
Dec(n);
if Controls[n] is TDBEdit then
"обнуляй"
end;

Подстановка Найти похожие ветки