2011-10-12 112 views
5

我正在开发一个项目,在项目中我必须实现一个简单的web服务器来显示欢迎页面。因此,我在表单上放置了一个TTCPServer,我可以成功将纯文本发送到与服务器交互的浏览器。但我怎样才能发送HTML?
TCPServer发送html到浏览器

我试过这个,但不起作用。

ClientSocket.Sendln('HTTP/1.0 200 OK'); 
ClientSocket.Sendln('MIME-version: 1.0'); 
ClientSocket.Sendln('Content-type: text/html'); 
ClientSocket.Sendln('Content-Length:'+IntToStr(Length(webpage)+10)); 
ClientSocket.Sendln(AnsiString(Format(webpage, [va, ma, mi, timexx]))); 

任何想法?无论如何,我不想使用其他组件。

+1

你确定长度计算吗? (HTML)字符串是在将其长度发送给客户端后构建的。 – mjn

+0

我删除了它是一个错误的值。好点子! – opc0de

回答

7

您需要在最后一个标题后面添加一个CRLF,以便浏览器可以确定标题结尾和主体开始。

+0

感谢它的工作就像一个魅力! – opc0de