Как очистить все окошки редактирования на форме

Delphi , Компоненты и Классы , TEdit

Для этого можно воспользоваться следующим кодом:

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

Статья Как очистить все окошки редактирования на форме раздела Компоненты и Классы TEdit может быть полезна для разработчиков на Delphi и FreePascal.

Комментарии и вопросы

:: Главная :: TEdit ::