delphi combobox - data herhaald

[Verwijderd]

Hallo

Ik heb een Delphi programma waarbij ik gebruik maak van tabs en een MySQL database. Nu heb ik een main screen waarmee je naar 'onzichtbare' tabs kunt gaan en dat je dan weer terug kunt naar de main. Het probleem zit dat wanneer je 2x naar een tab gaat dat mijn combobox ook 2x de database gegevens laat zien.

Ik gebruik nu de volgende code :

code:

procedure TForm1.verwijderenClick(Sender: TObject);
begin
kantine.ActivePage:=verwijderen_sheet;
verwijderen_sheet.TabVisible:=true;

q1.sql.clear;
q1.sql.add ('SELECT *');
q1.sql.add ('FROM kantinedienst');
q1.Sql.Add('ORDER BY kantinedienstID');
q1.Open;

with q1 do begin
  while not q1.eof do begin
    del_dienst.Items.Add(q1.FieldValues['kantinedienstNaam']);
    q1.Next;
    end;
  end;
end;

ik heb al geprobeerd om 'del_dienst.Items.Clear' voor 'q1.sql.clear' te zetten maar dit werkte ook niet

iemand een suggestie?

[alienfruit]

gewoon del_diens.items.duplicates := false doen ofzo

[Verwijderd]

ik heb het net gevonden hoe het moest, het is toch gewoon del_dienst.Items.Clear, maar ik had het verkeerd gezet