用Winnet下载一个网页有什么方法可以速度快点，大家帮忙改进一下代码


function PostNet(const URLA,URLB,PostA:string):string;
var
Session,
hConnect,hRequest:HINTERNET;
Buffer: array[1..1024] of Byte;
BufferLen: DWORD;
Str,BUff: string;
AcceptType:LPStr;
begin
 Session:=InternetOpen('',0,nil,nil,0);
 try
   hConnect := InternetConnect(Session,PChar(URLA),80, nil, nil,INTERNET_SERVICE_HTTP, 0, 0);
   AcceptType := PChar('Accept: */*');
   hRequest := HttpOpenRequest(hConnect, 'POST',PChar(URLB), 'HTTP/1.0',nil, @AcceptType, INTERNET_FLAG_RELOAD, 0);
   HttpSendRequest(hRequest, 'Content-Type: application/x-www-form-urlencoded', 47,PChar(PostA), Length(PostA));
   try
      repeat
      InternetReadFile(hRequest, @Buffer,SizeOf(Buffer), BufferLen);
      SetLength(Str,BufferLen);
      move(Buffer[1], Str[1], BufferLen);
      Buff:=Buff+Str;
      until BufferLen = 0;
      Result:=BUff;
    finally
      InternetCloseHandle(hRequest)
    end   
  finally
    InternetCloseHandle(Session);
    InternetCloseHandle(hConnect);
  end
end;
访问的速度很慢，有办法改进一下吗？例如只下载中间自己需要的部分信息或者其他快点的办法。