ComboBox.click und voriger Text - wie?

[Mattze]

Hi,

eigentlich dachte ich, das wäre problemlos. Aber...

Wenn ich einen Eintrag der Combobox anclicke, so wird dieser Eintrag als Text zurückgeliefert.
Ich brauche aber im Click den Eintrag, der VORHER als Text ausgewählt war.
Ist das möglich?
(OnSelect und OnChange scheinen das auch nicht zu machen. Oder habe ich da was übersehen?)

Gruß
Mattze

[mkinzler]

Merke dir den Index des vorher gewählten Eintrages manuell in einer Variablen

[Mattze]

Hallo,

na, das war ja eine schnelle Antwort.
Die Idee hatte ich natürlich auch. Fragt sich nur, wo ich mir die merken muss.
Ich dachte, dass es da vielleicht einen direkten Weg gäbe, den ich übersehen habe. Wäre einfach eleganter als mit Zwischenvariable.

Gruß
Mattze

[Helmi]

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.

[Mattze]

Hallo,

vielen Dank.
Das Problem war ja nur, an welcher Stelle des Programms das eingestellt werden muss.
(In der Onselect ging das nicht.)
Inzwischen habe ich aber eine ganz einfache Lösung in der anderen Komponente, die das braucht, gefunden.
Da gibt es genau das richtige Ereignis dafür!

Gruß
MJattze

PS: Ähh... Kann man den itemindex im OnDropDown vorgeben bzw. überhaupt vorgeben. Will bei mir nicht. Sobald ich die Liste öffne, wird der erste Eintrag markiert und nicht der, der auch im Text steht.
(Oder doch besser ein neuer Thread? Ist ja eine grundsätzlich andere Frage.)

[Dunkel]

Zitat von Helmi:

du musst dir den letzten Index speichern und zwar so:

Delphi-Quellcode:

{...}
private
  letzte_Auswahl: Integer;
{...}

Warum extra eine neue Variable anlegen wenn jede (?) Komponente eine Tag-Eigenschaft besitzt, in der man (richtig gecastet) so ziemlich alles ablegen kann?!

[Helmi]

Zitat von Dunkel:

Warum extra eine neue Variable anlegen wenn jede (?) Komponente eine Tag-Eigenschaft besitzt, in der man (richtig gecastet) so ziemlich alles ablegen kann?!

Hast recht - Tag kann man auch verwenden!