请问我如何能编写一个完全覆盖在IE上的ActiveXForm。(200分)

O

Orber

Unregistered / Unconfirmed
GUEST, unregistred user!
请问我如何能编写一个完全覆盖在IE上的ActiveXForm
即给人的感觉是打开了一个应用程序,完全看不到IE的标题栏、状态栏等。
 
在你的ActiveXForm里面写代码把当前IE设置成全屏浏览,然后让你的form填满IE窗口

-----
http://www.8421.org
 
请问如何在activeXForm中写代码设置IE为全屏浏览呢?(不会是用javascript写在页面里吧)
能否给一段代码。 谢谢。
 
我可以告诉你的,其实很简单的
 
bjf2001朋友,话没说完?
 
我的代码在公司的电脑上,周一发给你
 
to bjf2001:
能不能给俺也发一份!


dayhillbird@sdzg.com
 
我也要 himura_kenshin@163.com
thx[8D]
 
不知道这样形不,bjf2001能不能把代码发出来
var
sw: IShellWindows;
disp:IDispatch;
ie: IWebBrowser2;
i:integer;
begin
sw := CoShellWindows.Create;
for i := 0 to sw.count - 1 do
begin
disp := sw.item(i);
disp.QueryInterface(IWebBrowser2, ie);
if ie <> nil then
ie.FullScreen := True;
end;
end;
 
to bjf2001:
能不能给俺也发一份!

我也遇到了这个问题,只不过我用了一个简单的方法,把浏览窗口藏起来。
 
不知道可不可以这样变通,在ActiveForm中新建一个窗口,然后把原窗口隐藏了,新建的窗口
看起来就是与普通程序一样的了。
 
把代码贴出来吧。
 
贴出来大家都学习一下嘛!
 
用HWND GetParent(
HWND hWnd // handle to child window
);
得到IE的HWND然后就可以为所欲为了
 
to bjf2001:
能不能给我也发一份。leezhenghui@163.com
 
能不能给我也发一份
netbrand@163.com
 
顶部