Kein OnChange von TComboBox bei zuweisung von Itemindex

**ibp**

Hallo,

wenn ich bei einer TComboBox einen ItemIndex zuweise, wird kein OnChange Ereignis ausgelöst!
Wie kann ich per Code eine Auswahl treffen, wobei genau das gleiche abläuft, wie wenn ich es per Maus mache?

zusammenfalten · markieren

Delphi-Quellcode:

			unit 1

...

// suche combobox und finde wert in combopbox

cbs:=TStrings.Create;

with TComboBox(fDataShow.foView.FindComponent('fld_'+inttostr(i))) do

begin

  cbs:=Items;

  for k:=0 to cbs.Count-1 do

  begin

    if pos(inzidenz[j].csvVal,cbs.Strings[k])>0 then // auswahl gefunden

    begin

      ItemIndex:=k;

      break;

    end;

  end;

end;

cbs.Free;

... und später knallts, weil im onchange Ereignis noch ein paar wichtige Dinge passieren, die hier nicht ausgeführt werden

fDataShow.cobsgChange(TComboBox(fDataShow.foView.FindComponent('fld_'+inttostr(i)))); .. und das funktioniert nicht!

Kein OnChange von TComboBox bei zuweisung von Itemindex

Kein OnChange von TComboBox bei zuweisung von Itemindex

Forumregeln