Ich glaube, das geht nur in Verbindung mit "Sorted" oder?
Das funktioniert:
Delphi-Quellcode:
var
sl: TStringList;
begin
sl := TStringList.Create;
try
sl.Duplicates := dupIgnore;
sl.Sorted := true;
sl.Add('a');
sl.Add('b');
sl.Add('a');
ShowMessage(sl.Text);
finally
FreeAndNil(sl);
end;
end;
Ohne "Sorted := true;" geht es nicht.
Nachtrag: Ah, das steht in Klaus' Zitat am Ende, sehe ich gerade "Duplicates does nothing if the list is not sorted." 