[Alegun]

Можно явно, поиском

Код:

...
var
 i: integer;
begin
 for i:= 1 to 100 do
  (FindComponent('Edit' + IntToStr(i)) as TEdit).Enabled:= false;
end;

или неявно, опросом

Код:

...
var
i: integer;
begin
 for i:= 0 to ControlCount - 1 do
  if (Controls[i] is TCombobox) then
      Controls[i].Enabled:= false;
end;

для второго варианта требуется внимательность т.к. поменяются свойства у всех компонентов данного класса лежащих на форме