Discussion :

[logiciel_const]

Bonjour,
J'ai un combobox,je voudrai avant de lui rajouter une valeur dans items,vérifier son existence (variable),pour qu'elle ne se repete pas ,sachant que cette valeur est affecté à une variable par exemple 'mot'
Merci

[Aka Guymelef]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
if ComboBox1.Items.IndexOf( 'mot' ) = -1 then
  ComboBox1.AddItem( 'mot', NIL );

[logiciel_const]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
if ComboBox1.Items.IndexOf( 'mot' ) = -1 then
  ComboBox1.AddItem( 'mot', NIL );

merci pour le code,est ce qu'il permet de rajouter la valeur mot au combobox ou non?

[Aka Guymelef]

IndexOf renvoit -1 dans le cas où la chaîne que tu passes n'est pas contenu dans Items. Donc en vertu de mon code quand IndexOf m'indique n'est pas dans Items je rajoute la chaîne dans Items avec la méthode AddItem.

[ero-sennin]

Salut,

merci pour le code,est ce qu'il permet de rajouter la valeur mot au combobox ou non?

Bien sur qu'il ajoute le mot 'mot' en question (uniquement si il n'est pas trouvé).
Si tu ne comprends pas le code, n'hésites pas à demander!

Sinon, j'aurai plutôt fait ainsi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
procedure TForm1.Button1Click(Sender: TObject);
begin
if ComboBox1.Items.IndexOf( 'mot' ) = -1 then
  ComboBox1.Items.Add( 'mot' );
end;

Ce qui change c'est que j'utilise Items.Add ... ou lieu de AddItem ... mais dans le fond, c'est exactement la même chose

A+
[EDIT] Grillé

[Cl@udius]

merci pour le code,est ce qu'il permet de rajouter la valeur mot au combobox ou non?

Bien sûr, le mot est ajouté aux items du ComboBox si il est absent.
As-tu au moins testé ce code ?

@+

[logiciel_const]

Bonjour,
Pardon pour ce retard,le code marche trés bien ,
Merci à tous qui m'ont répondu