问题:打开一个主页如,如这个主页自动打开一个以上的广告页,这时只我的软件产生广告页的页面,没有看到内容实现如下:
1.constructor TTabSheetWithBrowser.Create(AOwner:TComponent);
begin
inherited create(AOwner);
Webbrowser := TWebbrowser.Create(Self);
Webbrowser.OnTitleChange := TitleChange;
FOver:= False;
end;2procedure TTabSheetWithBrowser.DoShow;
begin
Webbrowser.Align := alClient;
Webbrowser.Width := Self.Width;
Webbrowser.Height := Self.Height;
Self.PageControl.OnResize := OnReSize;
end;Webbrowser是产生了,但没有显示出来,问题在 Webbrowser.ParentWindow := Self.Handle;
1.constructor TTabSheetWithBrowser.Create(AOwner:TComponent);
begin
inherited create(AOwner);
Webbrowser := TWebbrowser.Create(Self);
Webbrowser.OnTitleChange := TitleChange;
FOver:= False;
end;2procedure TTabSheetWithBrowser.DoShow;
begin
Webbrowser.Align := alClient;
Webbrowser.Width := Self.Width;
Webbrowser.Height := Self.Height;
Self.PageControl.OnResize := OnReSize;
end;Webbrowser是产生了,但没有显示出来,问题在 Webbrowser.ParentWindow := Self.Handle;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货