add new demo

通过Webbrowser中脚本调用Delphi的函数。