ServerSocket的ServerType为stThreadBlocking,ClientSocket采用阻塞模式,
ClientSocket发送代码:
  ClientSocket1.Open;
  s := TWinSocketStream.Create(ClientSocket1.Socket, 60000);
  try
    msgStream:=TMemoryStream.Create ;
   try
     msgStream.Write(Edit1.Text[1],Length(Edit1.Text ));
     s.CopyFrom(msgStream,0); 
     msgStream.Free ;
   except
     msgStream.Free ;
   end;
  finally
    s.Free;
    ClientSocket1.Close;
  end;   
问题在于:ServerSocket在收到信息后,进行回复,而ClientSocket收不到回复信息,不知问题出在哪?