我试图使用ORACLE的LANG类型字段保存用户在浏览器留下留言，，，，但，，(100分)

我试图使用ORACLE的LANG类型字段保存用户在浏览器留下留言，比如：
“ 你好！我们都
想让你来这里，
可是你总不来，真生气”

我在服务器的显示结果的ACTION里面写代码如下；
procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);

begin
database1.Open;
query1.Active:=true;
response.Content:=query1.fieldbyname('content')
query1.Active:=false;
database1.Close;
handled:=true;

end;
浏览器的执行结果是：
“你好！我们都想让你来这里，可是你总不来，真生气”
没有了用户输入时候的空格和换行，
为什么？我该怎么办？

在ASP脚本中可以用这样一个函数来显示缩进。在Delphi中是否有现成的类似功能函数我不
太清楚，如果没有的话可以自己改写一个。
<% Function DecodeStr(Src)
Dim tmpstr
If IsNull(Src) or (Src="") Then
DecodeStr = ""
Exit Function
End If
tmpstr = Replace(Src, Chr(13), "<br>")
tmpstr = Replace(tmpstr, " "," ")
DecodeStr = tmpstr
End Function
%>
在显示有空格、回车等符号的内容之前调用之：
<%=DecodeStr(RS.Fields.Item("Content").Value)%>

对不起啊！一直没能上来
谢谢！Sachow,
问题已经搞定，