更强的适应能力 快让Authorware全屏演示吧

更强的适应能力 快让Authorware全屏演示吧(2)
    # 设置新的分辨率为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，在退出时再把显示器调回原来的设置，实现了真正的全屏显示课件。