我正在做一个项目，在该项目中，我必须实现一个简单的Web服务器才能显示欢迎页面。因此，我在表单上放置了一个TTCPServer，然后可以成功地将纯文本发送到与服务器交互的浏览器。但是如何发送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])));
有任何想法吗 ？我还是不想使用其他组件。
最佳答案
您需要在最后一个 header 之后附加一个CRLF，以便浏览器可以确定 header 的结尾和开头。
关于delphi - TCPServer将html发送到浏览器，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/7741079/