.. nun. da habe ich mich etwas weit aus dem Fenster gelehnt.
TMemo.lines hat keine Sorted Eigenschaft.
Delphi-Quellcode:
var
sl :TStringList;
begin
sl := TStringList.Create;
sl.assign(Memo1.lines);
sl.Sorted := true;
sl.Duplicates := dupIgnore;
sl.add(Edit1.Text);
Memo1.Lines.Assign(sl);
sl.free;
end;
Grüße
Klaus