Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi TStringList ignoriert doppelte Einträge nicht

**devidespe**

Hi,

ich benutze Delphi 2007 Pro und versuche, eine StringList mit Einträgen zu füllen. Dabei sollen doppelt hinzugefügte Einträge ignoriert werden. Hier ein vereinfachter Auszug meines Codes:

zusammenfalten · markieren

Delphi-Quellcode:

			var Liste : TStringList

    i : Byte;

begin

  Liste:=TStringList.Create;

  Liste.Sorted:=False;

  Liste.Duplicates:=dupIgnore;

  Liste.Add('Eintrag 1');

  Liste.Add('Eintrag 1');

  Liste.Add('Eintrag 1');

  for i:=0 to Liste.Count-1 do showmessage(Liste.Strings[i]);

  Liste.Free;

end;

Woran kann es liegen, dass die doppelten Einträge trotzdem vorhanden sind?