抛砖引玉:用Authorware文件属性使窗口全屏
用Authorware打开源文件,单击菜单“修改/文件/属性”,在文件属性窗口的属性页单击“大小”后面的下拉框,选“使用全屏”(图1)。现在不管你在什么分辨率的显示器下播放课件,演示窗口都是全屏的了。但这种方式的全屏有一个非常大的缺点,就是窗口虽然全屏了,但窗口里面的内容不会按比例扩大,而是显示在窗口的左上位置,超出800×600的位置将用窗口背景色填充,看起来有些别扭。即使我们在图1所示文件属性窗口中将“屏幕居中”选中也无济于事。
瞒天过海:用ucd(外部函数)遮盖背景在authorware安装光盘中自带有一些vcd,其中“cover”能将桌面隐藏起来,当authorware应用程序运行时,屏幕上只能看到演示窗中的内容。它带有两个函数,其中“cover()”能隐藏桌面,“uncover()”显示桌面。打开函数窗口,在“分类”下拉框选择课件名,单击左下角 [载入]按钮,载入这两个函数,然后单击[完成]按钮(图2)。接着在主程序最前面加一个计算图标,输入“cover()”,在主程序最后加一个计算图标,输入“uncover()”。运行课件,可以看到桌面变成了黑色,课件浮在黑色背景上,有点酷酷的感觉(要在图1的文件属性栏中把“屏幕居中”选中,课件窗口才会显示在中间)。当运行到“uncover()”后,桌面又会复原。
偷梁换柱:用UCD修改显示器分辨率
如果你不喜欢窗口边留出空白,我们还可以用UCD来直接修改显示器的分辨率。这里要用到的是一个比较有名的UCD:alTools。这个UCD包含的函数比较多,我们只要用到其中的“alChangeRes”函数。它的语法如下: alChangeRes(Width,Height,bitpp,ifreq)。其中“Width”是显示器像素宽度,“Height”是高度, “bitpp”是颜色位数,“ifreq”是刷新率。
载入alChangRes函数后,在主程序前面加一个计算图标,输入以下内容:
width:=ScreenWidth
height:=ScreenHeight
depth:=ScreenDepth
ifreq:=75
# 检测当前屏幕信息并保存起来。ScreenWidth、ScreenHeight、Screen-Depth三个系统变量保存了当前显示器的分辨率和颜色数
N_width:=800
N_height:=600
N_depth:=16
N_ifreq:=75
# 设置新的分辨率为800×600,32位真彩色,刷新率为75
if (Width=1024) then
alChangeRes(N_width,N_height,N_depth,N_ifreq)
# 如果显示器宽度为1024,进行屏幕调整
changed:=1
# 标记屏幕分辨率已被更改
end if
在退出程序的位置加入一个计算图标并输入以下内容:
if changed=1 then alChangeRes(width,height,depth,ifreq)
Quit()
#如果分辨率更改过,进行还原并退出程序
注:“#”后为注释。
当程序检测到当前显示器分辨率是1024×768时,将自动调整到800×600,在退出时再把显示器调回原来的设置,实现了真正的全屏显示课件。
当程序检测到当前显示器分辨率是1024×768时,将自动调整到800×600,在退出时再把显示器调回原来的设置,实现了真正的全屏显示课件。
这三种全屏方式的效果分别见图3、图4、图5。
标签: