比如打开当前路径CPMMAND文件夹下的11.exe,可以这么写JumpOutReturn(FileLocation^"command\\11.EXE")
让Authorware课件实现全屏播放2007-05-03 19:28 Authorware中,如果要实现课件的全屏播放,一般是通过修改文件属性,在“大小”选项中选择“User Full Screen”。这样设置之后在课件运行的时候窗口就会扩展到整个屏幕。但它有一个弊端,就是如果运行环境的分辨率和设计环境的分辨率不同,课件运行时会有画面只能局部显示或画面不能全屏显示的情况,很影响演示效果。 那么有没有一种方法可以既全屏播放,又不受运行环境分辨率的影响呢?本人终于找到一个工具: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()--退出 运行 这时我们可以看到,在运行初已经改变了屏幕分辨率,而且是全屏播放。当退出时,又改回到原来的分辨率。 注释:开始就保存是为了加载函数时使用相对路径,这样在其他机器上运行不会出现找不到文件的错误。
标签:authorware,相对路径,程序