这个表单的按钮，如何用webbrowser来点击啊（没有名字）

Question

<input type="submit" class="button" value="Preview"/>

Answer 1

多放一个<span id="jscode" style="display:none" onclick="eval(this.innerText);"></span>var
    JS: IHTMLElement;
begin
    JS := (WebBrowser1.Document as IHTMLDocument2).all.item('JS', 0) as IHTMLElement;
    JS.innerText := '代码...';
    JS.click;
end;

Answer 2

多放一个 <span id="jscode" style="display:none" onclick="eval(this.innerText);"> </span> var
    JS: IHTMLElement;
begin
    JS := (WebBrowser1.Document as IHTMLDocument2).all.item('jscode', 0) as IHTMLElement;
    JS.innerText := '代码...';
    JS.click;
end;

Answer 3

用click的script事件，delphi调用WebBrowser1的script的事件即可。