delphi 中Tidhttp1这获取网页数据的问题

delphi 中Tidhttp1这获取网页数据时如何在网页不响应的情况下不卡住主页面
我本来想放在线程中 但是会报一些莫名的错误

放线程里吧
图片说明
效果如图:
图片说明

https://zhidao.baidu.com/question/1642166286292592900

https://blog.csdn.net/u014802181/article/details/49996839