TWebBrowser相关问题(50分)

  • 主题发起人 主题发起人 adsl123
  • 开始时间 开始时间
A

adsl123

Unregistered / Unconfirmed
GUEST, unregistred user!
我将TWebBrowser放到页面中,然后通过页面的提交按钮提交,提交后返回一串参数,如何得到这个参数。
还有一个问题,如何给WordBool类型的参数赋值。
 
var
Form : IHTMLFormElement;
D : IHTMLDocument2;
begin
with WebBrowser1 do
begin
D := Document as IHTMLDocument2;
Form := D.Forms.Item('f1',0) as IHTMLFormElement;
(Form.item('wd',0) as IHTMLElement).setAttribute('value',Edit1.Text,0);
Form.submit;
end;
end;
 
后退
顶部