authorware中如何自动适应不同分辨率实行全屏播放

来源:百度知道 编辑:UC知道 时间:2024/06/21 06:15:46
Authorware中,如果要实现课件的全屏播放,一般是通过修改文件属性,在“大小”选项中选择“User Full Screen”。这样设置之后在课件运行的时候窗口就会扩展到整个屏幕。但它有一个弊端,就是如果运行环境的分辨率和设计环境的分辨率不同,课件运行时会有画面只能局部显示或画面不能全屏显示的情况,很影响演示效果。 而网上很多文章都只讲了通过函数Altools.u32改变显示器的分辨率来实现,其实这也并没从根本上解决问题,用手动也可做到。像我们学校教室的是大电视机它只支持800×600的分辨率,要是改了就没有显示,所以我想请教高手,authorware有没有办法能像powerpoit那样不受显示器分辨率影响呢?
非常感谢朋友的回答。请问回答该问题的高手能否与本人通过QQ交流一下,因为本人对变量和函数不是很清楚,只是略知一二。本人QQ是383091829

可以利用函数变量来判断控制!

x:=ScreenWidth

y:=ScreenHeight

col:=ScreenDepth

if x<>1024|y<>768 then

nu:=SystemMessageBox(WindowHandle, "您现在的分辨率是"^x^"×"^y^",您要改成1024×768吗?", "信息", 321)

-- nu是自定变量,

if nu=1 then

baSetDisplay(1024 , 768 , 32, "temp" , 1 )

end if

else--否则不用调整

SystemMessageBox(WindowHandle, "您现在的分辨率是1024X768。", "信息", 64) -- 1=OK

end if

记得程序结束之前(退出)要该回原来的数值

最后退出时,把三个数据直接改成电脑原有数值即可。当然这样做的缺陷是,换台电脑就要重新改过。