Fehler bei Zugriff auf TComboBox mit Objekten per Code

[ibp]

das ist nicht das problem, es hat bisher auch alles funktioniert. ich habe nur eine neue funktionalität zugefügt, welche werte automatisch den feldern (comboboxen, edits, checkbox etc)
zufügt.
und das passiert so:

Delphi-Quellcode:

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

ich habe auch schon alles per einzelschritten verfolgt etc. er macht alles selektiert das richtige item (welches hinterher auch korrekt in der db steht). nur dann wenn ich wieder auf das feld klicke kracht es!