Convertir "chr(13)" ó "#13" de un Tmemo a ";"

[ciscu]

Hola a todos!!!

Me gustaría saber cómo convertir los cambios de párrafo (los intros o cambios de linea representados por el carácter 13 de ASCII) de un TMemo a ";", por ejemplo.

Me podéis ayudar, por favor?

Gracias anticipadas

[roman]

Primero que nada te comento que en Windows los cambios de línea realmente están representados por dos caracteres #13#10 y no sólo #13.

Te puede ayudar la función StringReplace:

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

// Saludos