你的ClientSocket1是非阻塞方式,最好不要用TimeronTime进行定时连接,
非阻塞方式是用消息方式来连接服务器,而你用定时的话,它正在连接时,可能会你的定时处理给破坏了,所以出现“。。”

解决方案 »

  1.   

    copy_paste(木石三) :如何释放一个连接建立的缓冲区呢?
      

  2.   

    这个就不是很清楚了,你看看这里有没介绍:
    http://www.csdn.net/expert/topic/497/497187.xml?temp=.1840479
    http://www.csdn.net/expert/topic/497/497205.xml?temp=.9057276
      

  3.   

    copy_paste(木石三) :你那文章实在是太长了,无法打开,能不能把资料发送给我?谢谢:[email protected]
      

  4.   

    已发,是xml格式的,你下载xsl再看
      

  5.   

    copy_paste(木石三) :那个网页还是无法查看,下载了2.Xsl,并且修改了路径还是报错."ClientSock一直尝试去连接服务器,直到成功",你会如何写代码?
      

  6.   


    procedure TForm1.ClientSocket1Error(Sender: TObject;
      Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
      var ErrorCode: Integer);
    begin
        Memo1.Lines.Add('尝试了'+IntToStr(I)+'次,Error on '+IntToStr(ErrorCode));
        I:=I+1;
        ClientSocket1.Close;
        ErrorCode :=0;  
        
        ClientSocket1.Address :='10.0.0.138';
        ClientSocket1.Open ;
        
    end;行不行?