<tr>
<td><b>验证码</b></td>
<td><input id="register" style="width:88px; float:left" name="register" type="text" class="input1" value="点击显示验证码" onkeyup="javascript:if(this.value.length==6)checkrandimgfast(7);" onclick="this.value=''"/>
<div id="m7" style="display:none; width:16px; float:left; margin-left:2px; padding-top:2px;"> <img id="rightError"  src=""/></div></td>
</tr>以上是网页的代码,在Delphi的WebBrowser中怎么让这个register对话框获得输入焦点呢?

解决方案 »

  1.   

    WebBrowser.oleoject.document.all.item('register').focus;
      

  2.   

    LS的方法使用时提示:Method 'focus' not supported by automation object
      

  3.   

    WebBrowser.OleObject.document.all.item('register').focus;打少一字母
      

  4.   

    WebBrowser1.OleObject.Document.all.item('register').focus;
    可以获得焦点 但是文字没有消失要鼠标点一下才消失试试我的
    var
      Doc:IHTMLDocument2;
      Element:OLEVariant;  Doc := WebBrowser1.document as IHTMLDocument2;
      Element:=doc.all.item('register',0);
      Element.Focus;
      Element.click;
    俺不熟,只能这样了,应该能满足你的要求,呵呵~~~
      

  5.   

    找类型是input,name是register的 clickgetByTagName(input);
    if name is register then click 测试一下
      

  6.   

    虽然6楼朋友的方法没有成功,也多谢了7楼朋友的方法
    WebBrowser1.OleObject.document.getByTagName('input');
    提示Method 'getByTagName' not supported by automation object
    是我写错了吗?