湘教在线

第十一节 检测和调整显示器分辨率

√湘教在线   来源:  时间:[2007-7-4 11:44:31] 进入论坛

--将屏幕分辨率调为所要求的值
if wzMBReturnedValue=6 then
alChangeRes(N_width,N_height,N_depth)
changed:=1 --标记屏幕分辨率已被更改
else
GoTo(IconID@"next")
end if

GoTo(IconID@"next") --跳到主程序


9、群组(Group)图标“notice”中“pop-up alert”是Message Box知识对象(Knowledge Object),你可以按照提示进行各项设置。其中“Caption/Message”为设置弹出窗口的标题和消息内容,本例设置如下。

10、计算(Caculation)图标“end”是在程序退出前,判断用户的显示器分辨率在程序运行时,是否被修改过,如果被修改过,那么恢复原来的分辨率设置;反之直接退出。其中代码如下:

--如果屏幕分辨率被更改,程序退出时,恢复原设置
if changed=1 then alChangeRes(width,height,depth)

Quit() --退出

  这样你的程序在运行时,如果需要的话,就可以将用户显示器分辨率设置为合适值,也就能够使你的作品在所有用户的机器上完美重现了!

技巧提示:当程序中有大量的函数和变量时,关于变量的说明和程序中的注释语句是必要的,因为这样能使别人可以很容易读取自己的程序,在很长时间后也能根据注释迅速回忆起原来的内容。

源文件:本例使用了大量的变量和函数,请大家下载源程序,仔细琢磨。本源文件中包含和alTools.u32的最新版本。点击这里下载检测和调整显示器分辨率源文件

本新闻共2页,当前在第2页  1  2  

分类信息
湘教在线
湘教在线,更多精彩在首页,
湘ICP备08101769号 - 给湘教在线提意见
网站介绍 - 广告服务 - 联系我们 - 网站导航 - 黄金会员 - 服务承诺 - 诚聘高手 -
湘教在线版权所有
©2003-2008