VB程序怎么实现窗口全屏
我要做一个flash播放窗口,要求是点击全屏按钮后flash全屏播放,程序窗口去掉标题栏,完全覆盖整个电脑屏幕,就像迅雷看看和QQ影音之类的播放器一样全屏播放。点击退出全屏按钮恢复原来的窗口。我试过了windowState = 2,BorderStyle 属性设为 bsNone这个方法,这个要在窗口设置的时候把BorderStyle属性设为 bsNone,但是程序在运行过程中不能改变边框属性的。
请高手帮帮忙。 --------------------编程问答-------------------- 做2个form,一个有边框,正常的,一个无边框最大化.
剩下的你知道了 --------------------编程问答-------------------- 恩 应该用两个窗体,看看我的简易图像浏览器,双击图片进入全屏浏览,全屏时再双击还原成窗口模式,你可以参考一下:
http://download.csdn.net/detail/sysdzw/3927682 --------------------编程问答-------------------- 很感谢2楼3楼的回复,你们说的方法我已经做过,但是不是很理想,问题出在某些flash文件在全屏后回到非全屏,也就是从非全屏窗口与全屏之间的转换的时候,某些flash文件会重新播放,而不能接着原来的进度播放。
我的思路是这样的,有边框的窗口中播放的flash,点击全屏的时候在无边框的窗口播放,是取得有边框窗口中的flash播放帧接着播放的,但是有的flash文件只有一帧,全靠脚本控制的游戏flash就不能如意了。
所以,必须在一个窗口一个控件中播放flash。 --------------------编程问答-------------------- 把 flash控件放到一个图片框(或框架)控件中。
‘切换窗口’时,用 API函数 SetParent() 改变图片框的父窗口,同时调整一下图片框和flash控件的大小以适应窗口。
--------------------编程问答-------------------- 那可以通过api函数在运行时修改边框。 --------------------编程问答-------------------- 全屏幕可以先得到屏幕的分辨率,然后根据最大分辨率放大窗体,应该就可以了 --------------------编程问答-------------------- 试试这样,仍然使用普通窗口,当全屏的时候,将使用代码将窗口的四边边框栏设置到屏幕之外
补充:VB , 多媒体