Also um das mal zusammenzufassen:
Delphi-Quellcode:
procedure TForm1.AnyComboBoxChange(Sender: TObject);
var
box: TCombobox;
begin
box := Sender as TComboBox;
faecher_loeschen(box.Text, box.Tag);
end;
In das Tag der jweiligen Combobox setzt Du dann eben 1..8 ein.
Edit: Tags verhagelt...