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

У меня на форме большое количество Edit ов как их можно перебрать   Найти похожие ветки 

← →
Term   (2003-05-12 10:00) [0]

У меня на форме большое количество Edit"ов как их можно перебрать в цикле чтобы задать св-ву текст какое либо значение
сделал так

for i:=0 to Svedenia.ComponentCount do
begin
if Svedenia.Components[i] is TEdit then Svedenia.Components[i]..... но вот как обратиться к Text не знаю.
end;

---

← →
DVM ©   (2003-05-12 10:08) [1]

for i:=0 to Svedenia.ComponentCount-1 do
begin
if (Svedenia.Components[i] is TEdit) then
(Svedenia.Components[i] as TEdit).Text:=...;
end;

---

← →
Term   (2003-05-12 10:17) [2]

спасибо

---

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

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



Память: 0.45 MB
Время: 0.009 c