Caracteres extraños (#$D#$A)

[Casimiro Noteví]

Tienes varias posibilidades, una muy simple sería hacer algo así:

En la variable donde tengas la línea leída le quitas los últimos 2 caracteres

Código Delphi [-]
 cLinea := copy( cLinea, 1, length(cLinea)-2) );

También puedes recorrer todo el texto buscando esos caracteres y eliminarlos según los vas encontrando.

Código Delphi [-]
 cTexto   <- variable con el texto
 cNuevoTexto  <- variable donde irá el texto "limpio"
 
 for iX=1 to length(cTexto) do
     if not ((cTexto[iX]=#13) or (cTexto[iX]=#10)) then
         cNuevoTexto := cNuevoTexto + cTexto[iX];

Es poco eficiente, hay otras formas más "elegantes" de hacerlo, pero te puede valer.

[[Lepe]]

Código Delphi [-]

const SaltoLinea = #13#10;

begin

delete (mivariable, length(mivariable)-(length(saltolinea), length(SaltoLinea));

// o bien:
StringReplace(mivariable, saltolinea,' ',[rfreplaceall]);

(Recordemos que $D es el número 13 en hexadecimal, y $A es el 10)

Esos caracteres extraños corresponde a la constante salto linea. Normalmente el depurador de delphi los muestra como tú dices, otras veces aparece como una linea vertical en negrita (en labels y otros controles).

Como ha dicho Casimiro, ocupa 2 espacios; para generalizar, puedes usar la constante.

Tambien puedes usar Stringreplace para quitar todos los saltos de lineas (delphi 6 o superior)

Un saludo