Stocker des chaines de caractères dans une variables

Bonjour,

J'ai un DBGrid1, edit1,et trois labels matières;label1 pour Philo,label2 pour Maths,et label3 pour Français.
Je veux créer une variable

Code:

---

1 2 3 4 5

var a:string; begin a:=['6ème','5ème','3ème']; if(edit1.text=a) then label1.visiblue:=false;

---

car ces trois classes ne font pas philo mais le code ne marche pas.
sinon visible pour les classes de lycée

Comment résoudre ce problème?
Merci.

On ne peut pas mélanger les types de variables : si a est une chaîne, il ne peut être ni un tableau, ni un ensemble de 3 chaînes !

Pour faire ce que tu souhaites, tu peux ajouter les chaînes à tester à un TStringList (myStringList.Add('6ème');) et tester si la chaîne voulue en fait partie (Label1.Visible := not ( myStringList.IndexOf(Edit1.Text) > -1 ) ;)

"not > -1" ? fallait oser :)

il semblerait qu'il faille taper dans edit1 le classe concernée, ne serait-il pas plus judicieux d'utiliser une ComboBox et de tester son ItemIndex ?

en considérant que la ComboBox contient '6ième', '5ième', '4ième', '3ième', sur le OnChange de celle-ci on peut écrire

Code:

---

1 2	label1.visible := ComboBox1.ItemIndex = 2; // 4ième

---

Citation:

---

"not > -1" ? fallait oser

---

:mouarf: en effet, un EDIT pour ajouter le NOT après avoir constaté que le sens n'était pas le bon... :fessee:

et je plussoie le ComboBox