Delphi HTML转义

本文整理自网络，侵删。

 
function torehtml(const strHTML: string): string;
begin
  Result :=strHTML;
  Result := StringReplace(Result, '"', '"',  [rfReplaceAll]);
  Result := StringReplace(Result, '''', ''', [rfReplaceAll]);
  Result := StringReplace(Result, '>',   '>',  [rfReplaceAll]);
  Result := StringReplace(Result, '<',   '&lt;',  [rfReplaceAll]);
  Result := StringReplace(Result, '&',  '&amp;',  [rfReplaceAll]);
end;

常用HTML转义对照表
字符
十进制
转义字符
"
"
"
&
&
&
<
<
<
>
>
>
不断开空格(non-breaking space)
 
 
 

相关阅读 >>

Delphi android 安卓中保持屏幕常亮

Delphi mscomm1自动获取串口

Delphi 最简单的升级下载代码

Delphi流类 遍历读取流中的所有数据

Delphi adoquery 开启本地缓存

Delphi 遍历系统窗口标题可用于反外挂反破解

Delphi xe10 手机程序事件服务操作、退出键操作

Delphi findwindow的一些用法

Delphi memo控件对粘贴板的支持

Delphi 数据类型列表

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi HTML转义