sendstream的问题(50分)

  • 主题发起人 主题发起人 牛龙
  • 开始时间 开始时间

牛龙

Unregistered / Unconfirmed
GUEST, unregistred user!
我客户端用的是nonblock socket控件以下为发送数据的代码
不知道为什么服务器端老没有onclientread消息;
当我不用sendstream函数,而用sendbuf,服务器端就有onclientream消息响应.
现在我想用sendstream函数,如何解决这个问题?
谢谢

var
datastream:Tmemorystream;
begin
datastream:=TMemorystream.Create;
datastream.Write(ch,1);
ClientSocket1.Socket.SendStream(datastream);
end;
 
必须先用sendtext发送一下文本,服务器方才有onread事件,
delphi的怪毛病?:-(

 
必须先用sendtext或sendbuf发送一下,服务器方才有onread事件,
delphi的怪毛病?:-(
我是这样做的:
client server
sendtext('begin..'); receive it;sendtext('continue');
receive it;sendstream(..); receive it;sendtext('continue');
.. ...
sendtext('end') receive it;sendtext('ok');
disconnect.. disconnect..


 
我已经知道是什么原因了.

谢谢!!!
 
什么原因?
 
当发送时应该将position指针设为0
 
接受答案了.
 
How to Received this stream on other side ?
 
那我在另一边又应如何接收这个Stream呢?
可没有ReceiveStream,只有ReceiveBuf
我用不了呀!
谢谢!
 
后退
顶部