如何用authorware 改变屏幕分辨率?
为了让authorware做的东西在不同的机器上实现全屏播放,应该怎么做?authorware能通过一个按钮改变屏幕分辨率吗?应该怎么做?...
为了让authorware做的东西在不同的机器上实现全屏播放,应该怎么做?authorware能通过一个按钮改变屏幕分辨率吗?应该怎么做?
展开
2个回答
展开全部
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()--隐藏任务栏
AlChangeRes(640,480,32)--改变屏幕分辨率
ResizeWindow(640,480)--调整窗口大小
2、 将整个课件作为一个整体放在计算图标“初始化”下。
3、 再拖动一个计算图标到流程线上,命名为“结束退出”,打开并后输入以下语句:
AlShowTaskBar()--显示任务栏
AlChangeRes(userScreenWith,userScreenHeight,userScreenDepth)--恢复使用者原来的分辨率
Quit()--退出
运行
这时我们可以看到,在运行初已经改变了屏幕分辨率,而且是全屏播放。当退出时,又改回到原来的分辨率。
注释: 开始就保存是为了加载函数时使用相对路径,这样在其他机器上运行不会出现找不到文件的错误。
图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()--隐藏任务栏
AlChangeRes(640,480,32)--改变屏幕分辨率
ResizeWindow(640,480)--调整窗口大小
2、 将整个课件作为一个整体放在计算图标“初始化”下。
3、 再拖动一个计算图标到流程线上,命名为“结束退出”,打开并后输入以下语句:
AlShowTaskBar()--显示任务栏
AlChangeRes(userScreenWith,userScreenHeight,userScreenDepth)--恢复使用者原来的分辨率
Quit()--退出
运行
这时我们可以看到,在运行初已经改变了屏幕分辨率,而且是全屏播放。当退出时,又改回到原来的分辨率。
注释: 开始就保存是为了加载函数时使用相对路径,这样在其他机器上运行不会出现找不到文件的错误。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询