Очистка нескольких едитов в цикле

XaKO

Как в цикле очистить EDIT-ы, чтобы уменьшить количество строк?Причем такой код не подходит
for i := 0 to ComponentCount - 1 do
  if (Controls[i] is TEdit) then
  (Controls[i] as TEdit).Clear;
Потому что мне нужно очищать их выборочно
1 ответ

XaKO

Объяви массив индексов
EditIndexes: array[0..n] of Cardinal=(<индекс Edit`а>,...,<индекс Edit`а>);
Теперь
for i:=0 to n do
  (Controls[EditIndexes[i]] as TEdit).Clear;