delphi做的浏览器如何在打开一个网页的前提下打开另一个网页

2025-03-12 21:12:15
推荐回答(2个)
回答1:

设置默认浏览器呀

回答2:

procedure TForm1.WebBrowser1NewWindow2(Sender: TObject;
var ppDisp: IDispatch; var Cancel: WordBool);
var str:string;
begin
try
Cancel:=false;
str:= WebBrowser1.oleObject.document.ActiveElement.GetAttribute('href');
if str<>'' then
WebBrowser2.Navigate(str);
except
end;
end;