TIdTCPServer OnExecute事件将流发送到浏览器

时间:2014-05-08 18:08:57

标签: delphi indy tcpserver

当他输入我的TCPServer收听的主机和端口时,我遇到了将流发送到客户端互联网浏览器的问题。当我输入:

AContext.Connection.IOHandler.Write(clientResponseStream);

在我的TCPServer OnExecute事件中,将信息发送到客户端浏览器的唯一方法是如果我使我的服务器处于非活动状态。

TCPServer.Active := False 

- >只有在此之后,他的浏览器中才会显示一些信息。并不是整个数据 - 有些图片在那里,有些图片丢失了。有人可以帮助我如何发送我的(整个)数据而不必断开我的服务器吗?

对于每个GET请求(在我的OnExecute事件中)我都有我的TCPClient收到的HTTP响应

TCPClient.IOHandler.ReadStream(cStream, cStream.Size, False); 
看起来有点像这样:

HTTP/1.1 200 OK
Server: nginx/1.4.7
Date: Thu, 08 May 2014 18:46:43 GMT
Content-Type: application/x-javascript
Last-Modified: Fri, 28 Mar 2014 09:54:42 GMT
Transfer-Encoding: chunked
Connection: keep-alive
Vary: Accept-Encoding
Expires: Thu, 31 Dec 2037 23:55:55 GMT
Cache-Control: max-age=315360000
1a89
// some jquery here ...

我用

发送这些数据
AContext.Connection.IOHandler.Write(cStream);

0 个答案:

没有答案