procedure TForm1.wb1NewWindow2(Sender: TObject; var ppDisp: IDispatch;
var Cancel: WordBool);
begin
ppDisp:=wb2.DefaultDispatch;
end;
或者
procedure TForm1.wb1NewWindow2(Sender: TObject; var ppDisp: IDispatch;
var Cancel: WordBool);
begin
ppDisp:=wb2.Application;
end;
都是抄别人的。。。
本文介绍如何在窗体中整合并操作两个WebBrowser控件,实现复杂网页展示与交互功能。

3965

被折叠的 条评论
为什么被折叠?



