[angvelem]

Можно требуемым для очистки контролам присвоить одинаковый и уникальный Tag. Затем используя цикл с использованием ComponentCount очистить их, примерно так:

Код:

var
  I : Integer;
begin
  for I := 0 to ComponentCount - 1 do
    if (Components[i] is TEdit) and ((Components[i] as TEdit).Tag = 12345) then
      (Components[i] as TEdit).Text := ''
    else if (Components[i] is TComboBox) and ((Components[i] as TComboBox).Tag = 12345) then
      (Components[i] as TComboBox).Clear;
end;