实现“再按一次退出程序”e4a代码

     阅读 6077 次    更新时间:2014/9/15    

变量 启动时间 为 长整数型


事件 主窗口.按下某键(键代码 为 整数型,传址 屏蔽 为 逻辑型)
         如果 键代码 = 返回键 则
                 如果 取启动时间() - 启动时间 >2000 则
                            弹出提示("再按一次退出程序")
                            启动时间 = 取启动时间()
                 否则
                           结束程序()
                结束 如果
        结束 如果
结束 事件

 
 

Copyright 2003-2008 All Rights Reserved 自由风工作室 版权没有 [湘ICP备06002185号]
.