Заполнение всех Edit

← →
Zheks (2003-11-06 13:41) [0]

Кричите на меня, бейте, ну не могу я ни у себя, ни здесь найти как это делается. Киньте плз. ссылочку, аль код...

← →
Zacho (2003-11-06 13:42) [1]

Нажми на ссылку "поиск" и введи FindComponent

← →
Skier (2003-11-06 13:49) [2]

> введи FindComponent

Но лучше ComponentCount

← →
bon (2003-11-06 14:06) [3]

>Заполнение всех Edit_ов на форме
Чем и после чего?

← →
Stas (2003-11-06 14:06) [4]

Var c:TComponent
For i:=0 to Form1.ComponentCount-1
do begin
C:=FindComponent[i]
if c.ClassType=TEdit then TEDIT(c).text:="hhh"
end;