Ayuda con los Parser HTML
 

Hola forofos:

He desarrollado un modulo que utiliza controles no visuales para realizar parser desde HTML ha texto, con el objeto de guardar estos ultimos en una BD. Hasta ahi no hay problema pues los controles cumplen su función, a no ser por el pequeño problemilla que paso a explicar.

Esto es lo que existe en el archivo HTML:

Al extraer el texto entre los Tags HTML me devuelve asi, por ejemplo:

Pero quisiera(si se pudiera) crear una función en la cual me detectará el retorno de carro(#13+#10) y asi poder devolver la cadena asi:

Saludos.

¿Algo así?

Código Delphi [-]
 function QuitarSaltosLinea(Strs: TStrings; CharReplace:String=STR_EMPTY):String;
 var
   Str:string;
 begin
   Str := AnsiReplaceStr(Strs.Text, #10, CharReplace);
   Result := AnsiReplaceStr(Str, #13, CharReplace);
 end;