J'ai un ComboBox avec quelques mots dans les Items. Ce que je souhaite faire c'est que si l'on choisi un mot de la liste je veux mettre un autre mot qui n'est pas dans la liste en modifiant la propriété Text.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  if ComboBox1.ItemIndex=2 then
    ComboBox1.Text:='autre chose';
end;
Je précise que la propriété Style est bien sur csDropDown.
Le résultat c'est que le combo affiche ce que j'ai séléctionné sans tenir compte de mon affectation.
Je devrais même pouvoir enlever la ligne avec le if et après ça je ne peux plus simplifier pour trouver le problème.

J'ai besoin de vos lumières. Merci