delphi如何在memo中显示HTML代码？

准备做一个网页代码生成器，可是我通过代码中输入：
memo1.text:='<marquee height="50" direction="left" width="100%">
<font 就出现在错误 ，可能是HTML代码中代引号的问题，请问该怎么做啊

memo1.text := '<marquee height="50" direction="left" width="100%"><font ;

不能有换行的

如果要换行，用如下：
var a string;

a := 'a';
a := a + #13 + 'b';
a := a + #13 + 'c';

memo1.Text := a;

你输入的字符串太长了吧？ 这种方式给字符串赋植，右边的串最多只能写255个字符。

memo1.text := '&lt;marquee height="50" direction="left" width="100%"&gt;&lt;font ; 不能有换行的 如果要换行，用如下： var a string; a := 'a'; a := a + #13 + 'b'; a := a + #13 + 'c'; memo1.text := a;

最主要的问题是单引号和回车. 单引号在字符串中出现时要用两个连着的单引号; 回车则用#13#10, 即回车/换行(在memo中不要只用一个单个的回车符, 而是用回车/换行两个字符). 如果一个一个做比较麻烦, 建议把它写到一个文本文件中, 在程序运行时读入.