Fehler bei Zugriff auf TComboBox mit Objekten per Code

[ibp]

super es funzt jetzt!

habs so gelöst!

Delphi-Quellcode:

1: // ComboBox Feld = ReferenzFeld
begin
  with (fDataShow.foEAKompo[i].Feld as TComboBox) do
  begin
    for k:=0 to Items.Count-1 do
    begin
      if pos(inzidenz[j].csvVal,Items.Strings[k])>0 then
      begin
        ItemIndex:=k;
        OnChange(fDataShow.foEAKompo[i].Feld as TComboBox);
        break;
      end
    end;
  end;
end;