关于在Delphi2010里解压gzip的问题?(100)

  • 主题发起人 主题发起人 djunny
  • 开始时间 开始时间
D

djunny

Unregistered / Unconfirmed
GUEST, unregistred user!
我把测试的源代码附上了:http://www.mozhua.net/demo/test.rar代码片段idhttp1.Request.AcceptEncoding := 'gzip, deflate';//为什么开启gzip请求以后s := downResponse.DataString; //流保存的g.gz都能成功用winrar打开,没有错误 DownResponse.SaveToFile(extractFilePath(application.ExeName)+'g.gz'); //字符串s无论改成ansistring还是string,保存的gz压缩文件都与原来的格式有差距? SaveMyFile(0, extractFilePath(application.ExeName)+'s.gz', s); //因为我获取到的字符要先base64decode以后才能GZDecompressStr,所以得用字符串呀?还请高手们不吝赐教。 //D7里正常的处理的过程是: //GZDecompressStr(base64tostr(GZDecompressStr(s))); //但是现在在D2010里完全无法正常使用了?是什么原因呢?因为我获取到的字符要先base64decode以后才能GZDecompressStr,所以得用字符串呀?还请高手们不吝赐教。
 
试试这样:var s: AnsiString;然后确保GZDecompressStr等过程支持Delphi2010不然就用Delphi2007吧。
 
测试的源代码缺少 Base64ex, 无法帮你测试。
 
后退
顶部