Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Edit.Text

Автор: Анальгин 29.6.2004, 13:25

Как в цикле очистить содержимое Text для всех Edit которые на форме ?

Автор: gray_k 29.6.2004, 13:28

Код


for i=0 to Form1.ComponentsCoont-1 do begin
  if Form1.Components[i].ClassNameIs('TEdit') then
    (Form1.Components[i] as TEdit).Text := '';
end;

Автор: NiJazz 29.6.2004, 13:30

Код


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

Добавлено @ 13:30
gray_k
Одновременно прислали пост.

Автор: SoftLines 7.7.2004, 12:24

А можно и вручную!