如何实现Authorware课件演示窗口的全屏

Authorware中，如果要实现课件的全屏播放，一般是通过修改文件属性，在“大小”选项中选择“User Full Screen”(如图1所示)。这样设置之后在课件运行的时候窗口就会扩展到整个屏幕。但它有一个弊端，就是如果运行环境的分辨率和设计环境的分辨率不同，课件运行时会有画面只能局部显示或画面不能全屏显示的情况，很影响演示效果。

图1

那么有没有一种方法可以既全屏播放，又不受运行环境分辨率的影响呢？本人终于找到一个工具：Altools.u32，这里面有改变分辨率和隐藏任务栏的函数。说到这儿大家可能都明白了：噢，原来是通过程序改变分辨率和隐藏任务栏而全屏演示呀！对了，的确是这样，不过还要在程序退出的时候改回原来的分辨率。下面我们就来看一看具体实现的办法。

加载函数

打开Authorware，保存文件为“Change.a6p”，然后把Altools.u32拷贝到刚才保存的位置。按组合键“Ctrl+Shift+F”打开函数框，在“分类”里面选择“Change.a6p”，单击[载入]按钮，选择Altools.u32，加载里面的“AlChangeRes”函数，用同样方法，再加载“AlHideTaskBar”、“AlShowTaskBar”两个函数。先说明一下这三个函数的作用：

1、 AlChangeRes：改变屏幕分辨率的函数，基本格式为“AlChangeRes(Width,Height,bitpp)”。

2、 AlHideTaskBar：隐藏任务栏。

3、 AlShowTaskBar：显示任务栏。

编写程序

1、 拖动一个计算图标到流程线上，命名为“初始化”，打开并输入以下语句：

UserScreenWidth=ScreenWidth--保存用户监视器的宽度

UserScreenHeight=ScreenHeight--保存用户监视器的高度

UserScreenDepth=ScreenDepth--保存用户监视器的颜色深度

AlHideTaskBar()--