Заполнение полей

← →
Bishop © (2002-12-01 19:41) [0]

Привет, Мастера!
Извините, за ламерский вопрос, но в Делфах сижу совершенно недавно и для меня некоторые вещи не понятны.
Задача такая. На ворме лежат штук 15 Editов. Как бы мне их заполнить каким-нибуть текстом короче чем:
Form1.Edit1.Texst="aaaa";
Form1.Edit2.Texst="aaaa";
Form1.Edit3.Texst="aaaa";
Form1.Edit4.Texst="aaaa";
Может как-то через цикл это можно провернуть? Буду благодарен за код.

← →
ctapik-net © (2002-12-01 19:56) [1]

For I := 0 To Form1.ComponentCount-1 Do If Form1.Compoponents[I].ClassName=TEdit Then (Form1.Compoponents[I] as TEdit).Text := "aaaaa"
Похоже на правду

Оч похоже. Спасибо. Попробую

Заполнение полей Найти похожие ветки