delphi+js+edgebrowser获取网页源码

近期使用delphi+edgebrowser开发一个学习工具，需要获取edgebrowser打开网页的源码，在国内各大网站苦苦寻觅若干天无果，呕心沥血特发奇想，通过delphi+js获取edgebrowser获取网页源码的方法，终于解决了问题。现制作一个demo，获取网页源码并粘贴到记事本，供像我一样的菜鸟开发参考！