ComboBox OnChange

[delphien]

Hallo, eine einfache Frage an alle Profis.
Kann man im Onchange Handler den ComboBox.Text ändern ?
Bei mir klappt es nicht. Der Text wird immer wieder auf den
ursprünglichen Text zurückgesetzt.

[Nils_13]

Meinst du so etwas ?

Delphi-Quellcode:

procedure TForm1.ComboBox1Change(Sender: TObject);
var Text: String;
begin
  Text           := 'Foo!';
  ComboBox1.Text := Text;
end;

Bei mir läuft das.

[delphien]

ja, bei mir läuft's nicht.

[PierreB]

Du hast nicht zufällig die Eigenschaft Style der ComboBox auf csOwnerDrawVariable oder ähnliches gestellt ?
Falls doch stell mal auf csDropDown zurück und versuchs erneut.

[marabu]

Sollte der Style den Standardwert csDropDown aufweisen, dann ist vielleicht dieser thread für dich von Interesse: klick

Grüße vom marabu

[delphien]

So funktioniert es:

ComboBox.itemindex := X

X steht für den Index der Items, also

0 Text1
1 Text2
.....

DANKE

[marabu]

Deine Vorgehensweise deutet darauf hin, dass du den Style csDropDownList verwendet hast. Es können dann nur noch Werte aus der Items-Liste der ComboBox verwendet werden - oder gar kein Wert (ItemIndex -1). Das Ereignis OnChange() kann also nur durch eine bewusste Entscheidung des Benutzers ausgelöst werden. Diese Entscheidung wird dann ohne dein weiteres Zutun korrekt umgesetzt. Dein Eingriff im event handler macht nur dann Sinn, wenn du den Benutzer entmündigen willst...

Nachdenkliche Grüße vom marabu