各位
      我想在一个线程中做到如下:        连接->发送请求->接收->断开 我的报文前4个字节为长度,如何读取?对于超时如何控制?能否提供个完整的例子,(第一次用indy)

解决方案 »

  1.   

    delphi下的demo下有indy的例子
    C:\Program Files\Borland\Delphi6\Demos\Indy用delphi7要到
    http://www.indyproject.org/download/Indy9.html下载例
      

  2.   

    with IdTCPClient do
    begin
                try
                     connect;
                     WriteLn(str_send);
                     ReadBuffer(lenBuffer,4);
                     PackedSize:=strtoint(lenBuffer);
                     ReadBuffer(Buffer,PackedSize);
                     Disconnect;
                 except
                  on E : Exception do
                  begin
                        ShowMessage(E.Message);
                  end;
    //以下代码
        1.如何实在出现任何异常的情况下 能 disconnect;
           2.超时如何控制
      

  3.   

    with IdTCPClient do
    begin
         try
           connect;            
         except
           on E : Exception do
                  begin
                        ShowMessage(E.Message);
                        exit;
                  end;
         end;
         WriteLn(str_send);
         ReadBuffer(lenBuffer,4);
         PackedSize:=strtoint(lenBuffer);
         ReadBuffer(Buffer,PackedSize);
         Disconnect;
       end;