Código Delphi [-]cadena := StringReplace(cadena, '#13', ' ', [rfReplaceAll]);
cadena := StringReplace(cadena, '#13', ' ', [rfReplaceAll]);