Delphi 显示过大的json数据时卡机，该如何处理！

message_content := replaceStr(D_sa1[0].S['message_content']);
这个是从服务器转过来的json数据，文本信息过大，再显示的时候文件会卡主。
这个数据是一个html代码，接收后会用 WebBrowser显示，我想做的效果就是，可不可以在我用 WebBrowser显示的时候，出现一个“加载中..”的页面，等message_content 加载完，再显示整个页面信息呢？