Hallo,
Du kannst mit IndexOf feststellen, ob ein Eintrag schon in der Stringlist vorhanden ist:
Delphi-Quellcode:
...
if (MyStringList.IndexOf('Irgendwas')<>-1) then MyStringList.Add('Irgendwas');
...
Die bessere und sinnvollere Vorgehensweise wäre, mit einer
Query die Daten aus der
DB auszulesen:
Delphi-Quellcode:
with Query1
do
begin
Close;
// mit DISTINCT wird die Query veranlasst, keine doppelten Inhalte anzuzeigen
SQL.Text:='
SELECT DISTINCT MeinFeld FROM MeinerTabelle';
Open;
while not Eof
do
begin
MyStringList.Add(FieldByName('
MeinFeld').AsString);
Next;
end;
// while
end;
// with