delphi webbrowser 执行 js ---转

EmbeddedWB1.OleObject.document.parentWindow.execScript(memo1.Text, 'javascript');