我用idhttp控件下载文件,多次下载后它就会下载不下来,在http.get那发生异常,这是什么原因啊?代码如下:
http := TIdhttp.Create(nil);
    souradd:= 'http://'+hostaddress+'/test/'+filename;;
    destadd:= ExeDirect+'\temp\'+filename;
    http.Host:=hostaddress;
    http.Port:=80;
    MyStream:=TFileStream.Create(destadd,fmCreate);
    try
    begin
      http.Get(souradd,MyStream);
      Result:=0;
    end;
    except
      Result :=-1;
    end;
    MyStream.Free;