<div id="lowbtn">
<a href="javascript:;" class="start" a2s="click" obj="MAIN_START" opt="{"Name":"L_Start"}"><img src="http://test/btn.png" alt="Go!" class="loading" data-was-processed="true"></a>
<ul class="server" style="display: none;">
<li class="Talk">
<span class="icon"><img src="http://test/assets/common/btn/icon.png" alt="" class="loading" data-was-processed="true"></span>
voice
<a href="javascript:;" class="on" id="a_voice_check"><span class="hide">on</span></a>
</li>
</ul>
</div>
my delphi code
procedure TMainForm.WebBrowser1DocumentComplete(ASender: TObject;
const pDisp: IDispatch; const URL: OleVariant);
var
CurrentBrowser: IWebBrowser2;
TopBrowser: IWebBrowser2;
Document: OleVariant;
Doc3 : IHTMLDocument3;
begin
CurrentBrowser := pDisp as IWebBrowser2;
TopBrowser := (ASender as TWebbrowser).DefaultInterface;
if Assigned(CurrentBrowser) and Assigned(TopBrowser) then
begin
if CurrentBrowser = TopBrowser then
begin
doc3 := (pDisp as IWebBrowser2).Document as IHTMLDocument3;
doc3.getElementById('lowbtn').click;
end;
end;
I've tried different methods, but AV is occurring or doesn't work. Does anyone know a problem with my code or know a solution?
thx..