| Blog信息 |
|
blog名称:注册会计师（注会）练习软件
日志总数:398
评论数量:116
留言数量:27
访问次数:3265827
建立时间:2005年6月6日 |
| |
|
 [delpih编程]模拟点击网页中的按钮(转贴）
软件技术
吕向阳 发表于 2009/3/12 11:50:03 |
| {假如知道按钮名称, 譬如是: btnName}procedure TForm1.Button2Click(Sender: TObject);beginWebBrowser1.OleObject.document.all.item('btnName').click;//WebBrowser1.OleObject.document.all.item('btnName', 0).click;FormCreate(nil);end;{假如知道按钮的 ID, 譬如是: btnID}procedure TForm1.Button3Click(Sender: TObject);beginWebBrowser1.OleObject.document.getElementByID('btnID').click;FormCreate(nil);end;{假如只知道是第几个按钮, 譬如是第一个}procedure TForm1.Button4Click(Sender: TObject);beginWebBrowser1.OleObject.document.getElementsByTagName('input').item(0).click;FormCreate(nil);end; |
|
|