From 9a827db0c5afd7fb58d7bd0209ab5b2809e57c9b Mon Sep 17 00:00:00 2001 From: david Date: Thu, 17 Dec 2009 14:23:57 +0000 Subject: [PATCH] =?UTF-8?q?udf=5FRtfToText=20->=20fallo=20en=20conceptos?= =?UTF-8?q?=20con=20varias=20l=C3=ADneas.=20Se=20com=C3=ADa=20el=20primer?= =?UTF-8?q?=20car=C3=A1cter=20de=20cada=20l=C3=ADnea.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@487 f4e31baf-9722-1c47-927c-6f952f962d4b --- Database/udfs/funciones.pas | 8 ++++---- Database/udfs/udf_RtfToText.dll | Bin 441344 -> 441344 bytes 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/Database/udfs/funciones.pas b/Database/udfs/funciones.pas index 33d66d01..b0001ae5 100644 --- a/Database/udfs/funciones.pas +++ b/Database/udfs/funciones.pas @@ -215,11 +215,11 @@ var begin // Hay que quitar el salto de línea al final de la aSource RTF - aSource := StringReplace(Cadena, SaltoLinea, '', [rfreplaceall]); + aSource := Copy(Cadena, 1, length(Cadena)-2); - // o bien: - // - //aSource := Copy( cLinea, 1, length(cLinea)-2) ); + // Cambiar los saltos de línea que no son de RTF por un caracter para + // que se limpien. + aSource := StringReplace(aSource, SaltoLinea, '^', [rfreplaceall]); if InitSource then begin diff --git a/Database/udfs/udf_RtfToText.dll b/Database/udfs/udf_RtfToText.dll index e2595260c1b3932fc5269412a7edb9e7494a6087..d326ff57f31763318dbae976212acc5c96e7d220 100644 GIT binary patch delta 1372 zcmZwFPiWIn7y$63YqD+(94I^N59BaJ#6!*Z@ZyjN4GbLE;VP@PGmaj1n9xH93WEkZ z|BO)B5H^ts8ICb@hf-zLF-M?Nr`w^(kbxe0sF2YedMHxrFuvDHd6f4c$(Q$j-}n9` zdZk;hbf-MLdurhPwWl3?nJ*-G*JIwr1sx{aQsTJ|T^V>~iXMsT#3IC5?B9LL%57ggufhA@Xq zU}O8=FX3o&4c`p4Y=7+k;}`)O7qEXnt2zN&`Rh2r87tPOeO6CMfk09%*w?GL*TBKo zC0zfo*iLe{YcW{2g2Bja=fopi65CCY%z6nI%N`xiRh?qd$d27Meuc9fN9sAak>}Xr z@T$;tb`NLOx7H~14R>XaOp;p(XRl)WGm~5uT3s#cX*IK)7W(*&S3<(WA7p0I!uE3f z%f$}4OYV{H$#3LO@}XRiZMiI0d|OO^wlFXBu0A4DBc}zeC=rL7EUK`wJa$t z_SUTu7N_fx)#%HIMPDPI9OspGP9GJid}T~L(-35aHaExVEEjsTqR;tlLVF{fUQI;@iVKxi$i&?bDu|%E{3*$`-B_+7F+G*7P PQZGwLl*nk~q8a=LcL#h@A zq8r(yqHIMbWH@Aqhf-vfp%Umpy!Eid1P>JyGPgqyJ#=*%-)l#Cl=t9~KQG_^=g&)G zv__5AXvr^m#{%}$^C77z6&EDW6Uigd$&LebdMlDg{`5L`4eVH2D@Rbu4W*XU)7x^C zoP0uxqq%3&)eB^Un0j6LMXNpIdq=3>7q%4 zz$==vcQ9y1n$F*K7K42=9#1U|r>AHQYInRe$$40ew%zLfg=cN|;J~cjGJhqj2(fxD z9Ugi-HArilhpfq5ugPAq$8@Q>e^{XDtz`8o^@Yl}H?q$o>6IT_@|d(%D$CQ`Z{-EQ zv{=cP<g