如何从Delphi TWebBrowser获取HTML源码,并检测其流编码?