关于如何在游览器中打开多个页面的问题！急，请高手们快来帮忙！ ( 积分: 200 )

C

cainiaowang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-09

• #1

我开发一个浏览器，在窗体上放了一个pagecontrol控件，然后里面放了一个webbrowser控件，旁边四个按钮分别四个链接地址，我打开第一个时没问题，但不知道如何在点击其它按钮后相应增加webbrowser控件以达到同时打开页面的目的，救助啊。。。。。

我听别人说有webbrowser控件的改进版，说这个改进版有可以同时打开多个页面的功能，但我没找到，只要能达到这个同时打开多个页面的问题方法不限，先谢谢各位大侠了。。

第二个问题，我用这个浏览器打开一个聊天室，第一次打开时需要安装一个插件，我如何做到检测出这个插件并自动允许安装。

 

C

cainiaowang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-09

• #2

我开发一个浏览器，在窗体上放了一个pagecontrol控件，然后里面放了一个webbrowser控件，旁边四个按钮分别四个链接地址，我打开第一个时没问题，但不知道如何在点击其它按钮后相应增加webbrowser控件以达到同时打开页面的目的，救助啊。。。。。

我听别人说有webbrowser控件的改进版，说这个改进版有可以同时打开多个页面的功能，但我没找到，只要能达到这个同时打开多个页面的问题方法不限，先谢谢各位大侠了。。

第二个问题，我用这个浏览器打开一个聊天室，第一次打开时需要安装一个插件，我如何做到检测出这个插件并自动允许安装。

 

K

kinneng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-09

• #3

放四个webbrowser，控制它们的visible

 

L

liubin44966

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-09

• #4

看一下：
http://www.tomore.com/1/26502.html 多页浏览器

 

C

cainiaowang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-09

• #5

那个例子我看了，感觉不方便，请教这方面的控件谁知道在哪有的下载的？

 

S

stlont

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-09

• #6

不用什么控件，基本的pascal编程就能解决。
提供部分自制实例工程代码供参考：（动态打开N个页面）
其中DM为DataModula单元

const MAXAccount = 4;
var i : integer;
Tab : array[1..MAXAccount] of TTabSheet;
Web : array[1..MAXAccount] of TWebBrowser;
URL : string;
begin
DM.tblAccount.First;
for i := 1 to MAXAccount do
begin
Web:=TWebBrowser.Create(self);
Web.Align := alClient;
Tab:=TTabSheet.Create(self);
Tab.PageControl:=PageControl1;
// Tab.Caption:='站点'+inttostr(i);
Tab.Caption:=inttostr(i)+':'+DM.tblAccount['URLName'];
Tab.InsertControl(Web);
url:=DM.tblAccount['URL'];//.asstring;
Web.Navigate(url);
DM.tblAccount.next;
end;
end

 

C

cainiaowang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-09

• #7

其中DM为DataModula单元
这句内容谁能帮忙填补一下，不知如何操作，谢谢。。

 

S

stlont

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-09

• #8

自己看看代码，理解一下，这只是示范。
你可以把有DM的行全部删掉，
改：url:='http://www.delphibbs.com/'

因为多个网站地址我放在数据库中的，
数据库是使用DataModula集中处理的，
你可以不管这些，弄个数组存放就可以。

 

C

cainiaowang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-09

• #9

噢，谢谢了，我再试试

 

C

cainiaowang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-09

• #10

第一个问题解决了，不过在网页打开其它链接时，都是在新的窗口中显示，就是跳出另外一个窗口，如何控制这些窗口都在这个浏览内显示，求助。。。。

 

C

cainiaowang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-09

• #11

还有打开这些页面后在右键的关闭按钮中加什么代码才能使其关闭？？

 

老

老人家

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-10

• #12

To ainiaowang
动态增加webbrowser
插件是是自动下载的，你不用管，下在时需要等一段时间

 

C

chenybin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-10

• #13

在OnBeforeNavigate2设置对应cancel不行吗？

 

C

cainiaowang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-10

• #14

我在网上只找到一个有价值的游览器部分源代码，谁有比较完整的麻烦共享一下，在此谢谢了，大不了，我再开500分分给大家，恳求了。。。[]

 

可

可爱小猪

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-10

• #15

多个控件
不过比较占用内存
呵呵

 

C

cainiaowang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-12

• #16

TO:stlont
你的方法不错，有空再研究一下，只不过只是一部分功能，还有最关键的如何将跳出窗口也控制在浏览器中显示，在此谢谢了。

TO：liubin44966
你的源代码解了我燃眉之急，但也有一小部分主要功能没有，后来只有自己经过查书才终于解决了这个问题，谢谢了。

浏览器基本完工，但还有一些简单的功能没有实现，但这不影响我交货了，我会不断的完善它，也希望对网络编程这方面有兴趣的朋友或者高手能加我QQ：11925922，并注明DFW，这样我们可以共同进步，其实更多也是我在向大家学习，谢谢各位了。
stlont兄不知道如何查你的资料，希望看到这个回复请加我QQ，谢谢了。

 

C

cainiaowang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-12

• #17

多人接受答案了。