Slt le Forum Delphi,

Voilà j'ai un combobox Name: projet
les Item.Index sont configurés comme cela :
Banane
Pomme de terre


Voici le code qui pose un problème à l'exécution :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
procedure TForm1.ProjetChange(Sender: TObject);
begin
  if Projet.ItemIndex = 'Banane' then
      begin
        pointX:= 5;
        pointY:= 6;
      end;
end;
La ligne posant problème est le suivant :
Projet.ItemIndex = 'Banane'
J'ai essayé plein de truc comme
Projet.ItemIndex = "Banane" ou Projet.ItemIndex = Banane ou Projet.ItemIndex := 'Banane' (ce qui totalement faux mais bon ......)

Je n'arrive pas à voir l'erreur
Merci des aides