Question

能不能基于webBrowser的基础上发送post请求

Answer 1

部分代码如下：在窗口及WebBrowser创建完以后，写此代码：WebBrowser.OnNewWindow2:=IE1NewWindow2;给主窗口创建一个方法：procedureTBrowForm.IE1NewWindow2(Sender:TObject;varppDisp:IDispatch;varCancel:WordBool);VarNewForm:TBrowForm;begintryNewForm:=TPopBrowerForm.Create(application);NewForm.WebBrowser.OnNewWindow2:=IE1NewWindow2;//如果在窗口的Oncreate事件//有此代码，此处就可以省略ppDisp:=NewForm.WebBrowser.Application;NewForm.Show;Cancel:=false;exceptend;end;