Doppelte Einträge entfernen?

[dahead]

Zitat von smart:

Ich habe folgendes mal versucht:

Delphi-Quellcode:

sl := TStringList.Create;
       try
          For Z := 0 To Memo.Lines.Count -1 do
              begin
                   with sl do
                       begin
                             Sorted := True; //hier
                             Duplicates := dupIgnore; //hier
                             Add(Memo.Lines[Z]);
                        end;
                  Memo.Lines.Assign(sl);
               end;
           finally
           sl.Free;
          end;

Klappt aber nicht. Wohl ein Denkfehler!

du solltest die zuweisung von eigenschaften auch niemals in einer schleife aufrufen.
am besten weist du "Sorted := True; Duplicates := dupIgnore" nach dem Create zu.
so als allgemeiner tipp.