Combobox Change

[Carzoo]

Okay, was ich versucht habe:

Delphi-Quellcode:

procedure TForm1.ComboBox25Change(Sender: TObject);
begin
TestLabel.Caption:=Combobox1.text;

end;

liefert eine leere Beschriftung.

Nächster Versuch:

Delphi-Quellcode:

procedure TForm1.ComboBox25Change(Sender: TObject);
begin
TestLabel.Caption:=combobox1.items.Text;

end;

Ergebnis: Label Caption wurde zu:

DA
DB
DC
DD
DE
.
.
.

usw

jemand noch weitere Ideen? Am liebsten wäre mir, wenn ich den Index auslesen könnte, aber Text wär auch i.O.

Danke schonmal