自已编写的浏览器的的问题(60分)

  • 主题发起人 主题发起人 tbl
  • 开始时间 开始时间
T

tbl

Unregistered / Unconfirmed
GUEST, unregistred user!
  我编了一个浏览器,但我不想让它支持下载,不让超级连接再打开一个新的浏览器,只在我的浏览器中刷新即可。
 
那就别直接用IE,用HTMLVIEWER/FRAMEVIEWER,不过总没IE灵光
 
这样的浏览器只能你自己用.
 
在特定的环境的确需要定制各种形式,各种功能的软件,比如机顶盒:-)
相信T兄有其道理。
我回头再查查吧,估计满难的
 
可以在TWEBBrowser的onBeforeNavigate2这个事件里作些文章.
 
对,只要cancle掉,然后自己呼叫他打开这个url就可以了
 
唉!查了半天,查到了该问题,请继续讨论。。。
 
是用Webbrowser吗?如果是,可以在NewWindow2事件中做点文章。
他带两个给你的参数,一个是由你指定在哪个控件中显示,另一个
是由你指定是否Cancel。
 
浏览控件似乎不支持层(layer,dreamwaver常用到的),
借这里问一下.多谢tbl.
另外也有分.
 
cakk和dnchen的解释都不对。请问gongming:newwindow2的第一个参数如何用?
 
var
temp:ttabsheet;
web:TwebBrowser;
begin
temp:=ttabsheet.create(main);
temp.PageControl:=pagebrow;
temp.name:='b'+inttostr(webcount);
temp.caption:='正在下载..';

web:=tWEBBROWSER.Create(main);
temp.InsertControl(web);
with web do
begin
Align:=alClient;
hint:=inttostr(webcount);
showhint:=false;

OnNewWindow2:=browsernewwindow2;
onNavigateComplete2:=BrowserNavigateComplete2;
onprogresschange:=BrowserProgressChange;
OnBeforeNavigate2:=BrowserBeforeNavigate2;
Onstatustextchange:=BrowserStatusTextChange;
ondownloadbegin:=BrowserDownloadBegin;
Ondownloadcomplete:=BrowserDownloadComplete;
Ontitlechange:=BrowserTitleChange;

DragMode:=dmAutomatic;
ppDisp:=web.Application;
end;

 
接受答案了.
 
后退
顶部