Listbox Einträge vergl., bei Doppelbelegung einen Löschen

[bernau]

Zitat von DeddyH:

Das geht aber einfacher mit Sorted auf true und Duplicates auf dupIgnore.

[edit] Kommando zurück, das gilt nur für TStringlist. [/edit]

Dann sollte doch folgendes gehen

Delphi-Quellcode:

var
  sl:TStriglist;
begin
  sl:=TStriglist.create;
  sl.duplicates:=dupIgnore;
  sl.assign(sllistbox0.Items);
  sllistbox0.Items.assign(sl);
  sl.free;
end;

Edit: Bei mir auch komando zurück. Habe den ersten Post zu schnell überflogen.