Esta podría ser una opción
Código Delphi
[-]
var
SL: TStringList;
begin
SL := TStringList.Create;
try
SL.Sorted := true;
SL.Duplicates := dupIgnore;
SL.LoadFromFile('nombres.txt');
SL.SaveToFile('nombres.txt');
finally
SL.Free;
end;
end;
Pero tiene el inconveniente que reordena las líneas. Si eso no es problema, entonces te puede servir.
// Saludos