关键部分代码：

FIdhttp.Request.Referer := SQL;
stream := TStringStream.Create('');
stream.Position := 0;

FIdhttp.Get(SQL, stream);

if Pos('utf-8',FIdhttp.Request.ContentType)>0 then  //根据返回类型获取编码
  s := Utf8ToAnsi(stream.DataString)
else
if UTF8Decode(stream.DataString)<>'' then
  s := UTF8Decode(stream.DataString)
else
s := stream.DataString;
bl_result := Analystr(s);

stream.Free;

最新文章

1. centos 7.1 apache 源码编译安装
2. PHP乱码完美解决
3. SQL JOIN的用法
4. 对依赖倒置原则(DIP)及Ioc、DI、Ioc容器的一些理解
5. 对CSS居中的一点总结
6. mybatis处理单表多表操作以及动态sql和批量操作
7. bzoj3028食物
8. Combination Sum 解答
9. 如何使用沉浸式状态栏，让你的app风格更好看
10. 容器与Docker简介（三）Docker相关术语——微软微服务电子书翻译系列
11. JS 循环定时的一些思考
12. mssql 存储过程调用另一个存储过程中的结果的方法分享
13. python textwrap的使用
14. HTK计算mfcc/filter_bank源码解析
15. python中常见的错误类型
16. centos6.5制作OpenStack云平台Windows7镜像
17. SpringMVC -- 梗概--源码--贰--静态资源的访问问题
18. 递推2--过河卒（Noip2002）
19. NLayerAppV3--.net Core2实现的DDD分层架构
20. Maven 常见问题

热门文章

1. pycrypto安装各种方法试了，最后这种最快速最方便
2. css之line-height及图片文字垂直居中
3. PA教材提纲 TAW10-2
4. 在VMware上安装CentOS6 64位操作系统
5. 常用的几个CSS前端效果
6. return，break，continue三者区别
7. Introducing Outflux: a smart way out of InfluxDB
8. 【转载】【原创】华硕F8TR笔记本更换主板及喇叭教程
9. DevExpress GridControl控件行内新增、编辑、删除添加选择框
10. linux下目录简介——/proc