超简单~加个函数转换下就OK了~ 

UTF8Decode() 

我的用法是Memo1.text:=UTF8Decode(idhttp1.get(‘‘)); 

转自：

http://hack518.blog.sohu.com/99364146.html

https://www.iteye.com/blog/netfork-391753

1、使用TIdHTTP，如果访问的页面是utf-8编码，下载到页面后，需要进行编码转换。 
utf8toansi(idhttp1.Get( ‘http://192.168.1.9/test.html ‘))

Delphi idhttp解决获取UTF-8网页中文乱码问题