E4A双击返回键退出程序源码

'安卓返回键退出程序
事件 窗口_首页.按下某键(返回键 为 整数型,传址 屏蔽 为 逻辑型)
	提示退出()
结束 事件

变量 启动时间 为 长整数型
过程 提示退出()
        如果 取启动时间() - 启动时间 >1000 则
                弹出提示("再按一次退出程序")
                启动时间 = 取启动时间()
        否则 
                结束程序()
        结束 如果        
结束 过程