Changeset 819 for cprs/branches/tmg-cprs/CPRS-Chart/rHTMLTools.pas

Timestamp:

Jul 2, 2010, 7:54:17 PM (15 years ago)

Author:

Kevin Toppenberg

Message:

Fixed crash on non-login

File:

• cprs/branches/tmg-cprs/CPRS-Chart/rHTMLTools.pas (modified) (1 diff)

cprs/branches/tmg-cprs/CPRS-Chart/rHTMLTools.pas

@@ -509 +509 @@
   begin
     Result := AnsiReplaceText(Text,'<NO DATA>',#$1E); //protect sequences we want
+    Result := AnsiReplaceText(Result,'LI>'+CRLF,#$1D); //protect sequences we want   //elh
+    Result := AnsiReplaceText(Result,CRLF +'<P>','<P>'); //protect sequences we want   //elh
+    Result := AnsiReplaceText(Result,'<P>'+CRLF,'<P>'); //protect sequences we want 
     Result := AnsiReplaceText(Result,'>'+CRLF,'>'#$1F); //protect sequences we want
     Result := AnsiReplaceText(Result,CRLF,'<BR>'+CRLF); //Add <BR>'s to CrLf's
-    Result := AnsiReplaceText(Result,'>'#$1F,'><BR>'+CRLF); //Restore sequences we wanted
+    Result := AnsiReplaceText(Result,'>'#$1F,'><BR>'); //Removed +CRLF  //Restore sequences we wanted  //elh Added <BR> to replacement text
+    //Result := AnsiReplaceText(Result,'>'#$1F,'>'+CRLF); //Restore sequences we wanted
+    Result := AnsiReplaceText(Result,#$1D,'LI>'+CRLF); //protect sequences we want   //elh
     Result := AnsiReplaceText(Result,#$1E,'<NO DATA>'); //Restore sequences we wanted
   end;