FMX TComboBox Zugriffsverletzung bei Itemindex -1

[Wiener]

Hab den Fehler gefunden:

Durch ändern des Itemindex wird OnChange ausgelöst und dort hatte ich einen Aufruf einer Funktion - welcher die Zugriffsverletzung verursachte.
Mit einer if Abfrage hab ich es gelöst:

Delphi-Quellcode:

procedure TForm1.ComboBox_Pers_BetreuerChange(Sender: TObject);
begin
   if ComboBox_Pers_Betreuer.ItemIndex <> -1 then
      PersonFunctionen.Betreuerwechsel;
end;