DELPHI的Indy Clients上的IdTCPClient控件如何接收数据????

Question

它似乎没有事件可以用来接收数据的?

Answer 1

看这段代码
procedure button1click(sender:Tobject);
var
  AStream: TFileStream;
begin
  with idTCPClient1 do
  begin
    Host:=edit1.Text;
    Connect;
    while Connected do
    begin
      AStream := TFileStream.Create('SingunSoft.tmp',fmOpenWrite);
      try
        ReadStream(AStream, -1, True);//读文件数据的方法
      finally
        Disconnect;
        AStream.Free;
      end;
    end;
    messagebox(0,'传送完成','信息',0);
end;可以看看delphi附带的TIdTcpClient.ReadStream方法的帮助.或者看indy的demos