一个独立的直接可用的delphi下的从WebBrowser得到全部html源码的函数，附uses单元。