如何在authorware中,改变视频窗口的大小呢? 10
我在authorware中,插入了一段视频。可是窗口很小。请各位大侠帮帮忙,指教一下,该怎么改变窗口的大小,使其满屏显示呢?谢谢...
我在authorware中,插入了一段视频。可是窗口很小。请各位大侠帮帮忙,指教一下,该怎么改变窗口的大小,使其满屏显示呢?谢谢
展开
1个回答
展开全部
--Cover()--遮盖屏幕
alHideTaskBar()--隐藏Windows任务栏
--这里是本程序运行所需的屏幕分辨率
--本例设为800×600,16位真彩色,你可以改为你想要的值
N_width:=800
N_height:=600
N_depth:=16
--先检测当前屏幕分辨率,并保存起来,以便程序退出时恢复
width:=ScreenWidth
height:=ScreenHeight
depth:=ScreenDepth
--将屏幕分辨率调为所要求的值
if ((ScreenDepth <N_depth)|(ScreenWidth<>800)) then
alChangeRes(N_width,N_height,N_depth)
changed:=1 --标记屏幕分辨率已被更改
else
GoTo(IconID@"next")
end if
alHideTaskBar()--隐藏Windows任务栏
--这里是本程序运行所需的屏幕分辨率
--本例设为800×600,16位真彩色,你可以改为你想要的值
N_width:=800
N_height:=600
N_depth:=16
--先检测当前屏幕分辨率,并保存起来,以便程序退出时恢复
width:=ScreenWidth
height:=ScreenHeight
depth:=ScreenDepth
--将屏幕分辨率调为所要求的值
if ((ScreenDepth <N_depth)|(ScreenWidth<>800)) then
alChangeRes(N_width,N_height,N_depth)
changed:=1 --标记屏幕分辨率已被更改
else
GoTo(IconID@"next")
end if
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询