Sugerencia, usa una lista temporal con la propiedad
Duplicates=dupignore para evitar insertar elementos duplicados y después copias los elementos al listbox.
Algo como esto :
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
Temporal: TStringList;
begin
Temporal:=TStringList.Create;
Temporal.Sorted:=True; Temporal.Duplicates:=dupIgnore;
Temporal.LoadFromFile('Lista.txt');
ListBox1.Items.AddStrings(Temporal);
Temporal.Free;
end;
Saludos