用idhttp下载文件，怎么只能下载小文件？1M以上的就不行了

Question

我的代码如下： stream:=TFileStream.Create(m_fileName,fmCreate);
  m_http.Get(m_url,stream);
  stream.Free;idhttp控件属性都是默认的。这段代码是放在一个线程里执行的，可只能下载小文件，1M以上的就不行了，需要改那里吗？

Answer 1

 with TIdHTTP.Create(nil) do
    try
      HandleRedirects :=True;
      Get(m_url,stream);
      Result := True;
    finally
      Free;
      F.Free;
    end;

Answer 2

是不是网络不好啊？
没碰到过这种情况，但网络不好时get有时会阻塞，onwork都得不到调用

Answer 3

根文件大小是没有关系的，你在TIdHTTP的Onwork等事件跟一下。