udf_RtfToText: corregido el reemplazo de los saltos de línea por cadena vacia.

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@255 0c75b7a4-871f-7646-8a2f-f78d34cc349f
2008-02-06 19:09:34 +00:00 · 2008-02-06 19:09:34 +00:00 · 9da004e099
commit 9da004e099
parent 31ed4a886b
2 changed files with 1 additions and 1 deletions
--- a/Database/udfs/funciones.pas
+++ b/Database/udfs/funciones.pas
@ -215,7 +215,7 @@ var

 begin
  // Hay que quitar el salto de línea al final de la aSource RTF
-  aSource := StringReplace(Cadena, SaltoLinea, ' ', [rfreplaceall]);
+  aSource := StringReplace(Cadena, SaltoLinea, '', [rfreplaceall]);

  // o bien:
  //
--- a/Database/udfs/udf_RtfToText.dll
+++ b/Database/udfs/udf_RtfToText.dll