Hallo,
ich stand mal vor dem gleichen Problem und so wie es mkinzler schon richtig sagte, du musst dir den letzten Index speichern und zwar so:
Delphi-Quellcode:
{...}
private
letzte_Auswahl: Integer;
{...}
procedure TMainForm.ComboBox_Select(Sender: TObject);
var
S_alt: String;
S_neu: String;
begin
//letzte Auswahl
S_alt := ComboBox.Strings[letzte_Auswahl];
ShowMessage(Format('alter Text: %s', [S_alt]));
S_neu := ComboBox.Text;
ShowMessage(Format('neuer Text: %s', [S_neu]));
//letzte Auswahl speichern
letzte_Auswahl := ComboBox.ItemIndex;
end;
Dürft kein Fehler drin sein...
Ach ja - ich setz im OnCreate der Form immer noch die Variable, hier "letzte_Auswahl" auf 0, damit sie definiert ist.
mfg
Helmi
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<