webbrowse 和 mdi 窗口问题(100分)

  • 主题发起人 主题发起人 payer
  • 开始时间 开始时间
P

payer

Unregistered / Unconfirmed
GUEST, unregistred user!
我看这个程序的源码,上 www.tom.com newwindow2会有问题
http://www.tomore.com/1/2402.html

弹出窗口超出屏幕后,设好 ddisp=wb.def... 后wb会不见了 :'(
<script>
window.open('bt1.htm','21cn','top=1024,left=1280,width=400,height=300');
</script>
 
我尝试过使用 pagecontrol 是没有这个问题的 :(
 
可能是Parent的Visible属性的事
 
如果这样使用 mdi 窗口也没有问题
<script>
window.open('bt1.htm','21cn','top=0,left=0,width=400,height=300');
</script>
 
最算自己做一个最简单的 mdi + wb 的程序也会出现这个问题
 
我现在用 frame + panel 也有这种问题 :'(
 
我用pagecontrol+web,没问题,但是有一点。新打开页面的时候会跑到其他程度的窗体后面。
 
pagecontrol + web 新开的页面会跑到其它程序的窗体后面?没有试过
 
具体情况:http://www.tiantiansoft.com/bbs/dispbbs.asp?boardID=4&ID=120145&page=1
 
我用 pagecontrol 的时候没有用这一句 tab.Parent 呵呵,直接 tab.controlpage = controlpage;
 
哦,哪也没关系。默认是self吧.
 
我用 panel + wb 也不行,反正openwin超出屏幕大小就有问题了
newwindow2:
WB:= TEmbeddedWB.Create(nil);
P.InsertControl(WB);
ppDisp := WB.DefaultDispatch;
WB.Align := alClient;

fts.Tabs.AddObject('about:blank', WB);
fts.TabHints.Add('about:blank ');
fts.Indexes.Add('-1');
fts.TabIndex := fts.Tabs.Count - 1;
 
今天我用了另一个方法来解决这个问题了,使用mdi窗口也可以正常显示了 :D
 
你们有什么方法?
 
我又做了一个实验,在mdi窗口里创建了一个pagecontrol,但新的窗口还是不能正常显示
但如果在一个mdi窗口里动态创建ttabsheet就没有问题,头痛呀~大家给点建议呀~
 
newwindow2:
WB:= TEmbeddedWB.Create(nil);
P.InsertControl(WB);
P.Visible:= False;
ppDisp := WB.DefaultDispatch;
WB.Align := alClient;
P.Visible:= True;
 
刚刚用 e- 的方法试了,还是看不到
 
果然是 parent 的问题,我已经试验成功了,但与 visible 无关 [:D]
在新的mdichild里
newwindow2:
tmpFrm := mdifrm.create(nil);
tmpFrm.panel1.parent := tmpFrm;
ppdisp := tmpfrm.wb.DefaultDispatch;
 
我上面的方法只在 mdi 窗口有效,TNND
 
哈哈,我已经完美解决这个问题了 :$
 

Similar threads

后退
顶部