Du hast Zugriff auf den vorigen ItemIndex in den Ereignissen
OnKeyDown
und
OnDropDown
. Diese beiden decken alle eventualitäten ab, die passiert sein müssen, bevor der
ItemIndex
geändert werden könnte. Was du nun also machen musst, ist, diesen zu speichern.
Das in diesen Ereignissen und nicht im
OnChange
oder
OnEnter
zu machen, deckt leider nicht alle Eventualitäten ab.
Delphi-Quellcode:
var OldIndex: Integer;
procedure TForm1.ComboBox1DropDown(Sender: TObject);
begin
OldIndex := ComboBox1.ItemIndex.ToString;
end;
procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
OldIndex := ComboBox1.ItemIndex.ToString;
end;