var<br> o: Olevariant;<br> all: IHTMLElementCollection;<br> item: IHTMLElement;<br><br>begin<br> o := WebBrowser1.OleObject.document.all.item('username', 0);<br> o.value := 'andy263';<br> o := WebBrowser1.oleobject.document.all.item('password', 0);<br> o.value := '123456';<br> o := WebBrowser1.oleobject.document.all.item('loginsubmit', 0);<br> o.click;<br>一个自动添用户名密码的例子 其中 'username' 'password' 'loginsubmit'的名字<br>在网页的源码里找 <name=xxxx>那个xxxx