delphi7使用ClientSocket.Socket.ReceiveText接收上的问题请教一下大神

Question

请教一下各位大神，小弟我用delphi7的ClientSocket.Socket.ReceiveTex接收数据
在断点调试上设在ClientSocket.Socket.ReceiveTex这段然后再单步往下调试的时候就能收到有数据
但是如果我跳过这个，在ClientSocket.Socket.ReceiveTex这个之后的地方设置断点发现收到的数据都是空的
这是何解呢？ClientSocket连接的地方数据发送是正常的，请教一下各位大神这是何解呢？Delphi

Answer 1

ClientSocket 把货送到后也不用你签收他拍拍屁股走了，你没接货的话当然就啥也没有了

Answer 2

但是我是这样写得
var
  Data： string；
Data:= ClientSocket.Socket.ReceiveText
我单步调试停的这里的时候Data是有值的，但是如果我断点放在之后的地方Data就没值了呢

Answer 3

把接收代码贴出来,可能是你给Data重新赋值了吧,

Answer 4

没呢~
我Data的数据赋值的地方就只在 Data:= ClientSocket.Socket.ReceiveText 这一句

Answer 5

 已经在该物件的事件中了，改为 Data:= Socket.ReceiveText(去掉ClientSocket.) 就不会发生影响原物件变数指标的状态。

Answer 6

procedure TForm1.ClientSocket1Read(Sender: TObject;
  Socket: TCustomWinSocket);
begin
    Memo1.Lines.Add(Socket.ReceiveText);    //有数据到达时会触发这个事件
end;