Discussion :

[stfanny31]

salut tt le monde
j'ai dans mon application un comboBox au quelle a chque fois on ajoute le contenu d'un edite
j'ai utilisé la fonction suivante:

Code :

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

ComboBox1.Items.Add(Edit1.Text);

mais je ve que il y'és pas de duppliqué (répétition)dans mon commboBox
esque il y'a une function qui supprime les duppliqué?

[ero-sennin]

Salut,

On peut jouer sur le IndexOf du TComboBox :

Code :

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

1
2
3
4
5
6
7
procedure TForm1.Button1Click(Sender: TObject);
begin
if ComboBox1.Items.IndexOf('toto') = -1 then
  ComboBox1.Items.Add('toto')
else
  ShowMessage('Erreur');
end;

Ou en fonction comme ceci:

Code :

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

1
2
3
4
5
6
7
8
9
function AjoutItem(Item:String;ComboBox:TComboBox): boolean;
begin
  Result:=false;
  if ComboBox.Items.IndexOf(Item) = -1 then
  begin
    ComboBox.Items.Add(Item);
    Result:=true;
  end;
end;

Exemple:

Code :

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

1
2
3
4
5
6
7
procedure TForm1.Button1Click(Sender: TObject);
begin
 if AjoutItem('toto',ComboBox1) then
   ShowMessage('Insertion Ok')
 else
   ShowMessage('Duplication détectée! Item non ajouté!');
end;

En espérant t'avoir aidé!
@+

[evarisnea]

je doute que le combobox aie une telle fonction, mais tu peux faire ceci lors de l'ajout de tes éléments à la liste

Code :

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

1
2
  if ComboBox1.Items.IndexOf(Edit1.Text) < 0 then
    ComboBox1.Items.Add(Edit1.Text);

ainsi avant d'ajouter un élément à la liste on vérifie tout d'abord si celui ci ne s'y trouve pas déjà.

Edit: Grillé

[stfanny31]

merci bcp a tous