用IdHttp数据
    ParaList := TStringList.Create ;
    Response := TStringStream.Create('');
    ParaList.Add('txtTrackNbrs='+ '91471612691') ;
       FIdHttp.ProtocolVersion := pv1_1;
      FIdHttp.Request.ContentType := 'application/x-www-form-urlencoded' ;
      FIdHttp.Request.Referer := QryURL ;
      FIdHttp.Request.Host := 'www.dhl-usa.com' ;
      FIdHttp.Request.ContentEncoding := 'gzip, deflat' ;
      FIdHttp.Request.ContentLanguage := 'zh-cn'  ;
      FIdHttp.Request.Accept := 'text/html' ;
       FIdHttp.Post('http://track.dhl-usa.com/TrackByNbr.asp?nav=Tracknbr',ParaList,Response) ;
        FHtmlText := Response.DataString ;
读来的数据是乱码。。用了好多方法都没法子转过来。。用没有高手过来帮帮我啊。。帮我把字符转成和网页里的一样在网上查询数据方法。。打开 http://track.dhl-usa.com/TrackByNbr.asp?nav=TrackBynumber
在textarea中输入91471612691 点查询可得到数据有人和我说这个网页是经过Gzip压缩的。。叫我先解压。。可我好水做不出来。。高手帮帮我。。
做过几次没有成功
用 TIdCompressorZLibEx.DecompressGZipStream解压为空
用 TIdZLibCompressorBase.DecompressGZipStream解压报错。。高手再帮帮我啊。。有没有高手帮帮我啊。。急啊。。