En el caso del primer link recomendado por delphi.com.ar, me parece que la implementación tiende a perder memoria, pues hay un objeto llamado str que se crea y nunca es liberado.
Además, puede perder recursos al no utilizar composiciones
try/finally
Te recomiendo tener cuidado con él.
Hasta luego.
