Question

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

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

Answer 1

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

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

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

Answer 2

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