易安卓E4A载入创建新窗口

易安卓E4A载入创建新窗口  切换窗口（主窗口  窗口1   窗口2）  软件有列子

主窗口代码

    变量 启动时间 为 长整数型
事件 主窗口.创建完毕()    
    主窗口.添加菜单("关于",-1)
    主窗口.添加菜单("退出",-1)
    
    保存窗口("主窗口",本对象) '本对象是当前窗口
    
    保存窗口("窗口1",创建 窗口1)
    
结束 事件

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

事件 主窗口.菜单被选择(菜单名 为 文本型)
    判断 菜单名
        分支 "关于"
            信息框("关于","E4A多窗口例程","确定")
        分支 "退出"    
            结束程序()
    结束 判断
结束 事件

事件 按钮1.被单击()
    切换窗口(读取窗口("窗口1"))
结束 事件

事件 按钮2.被单击()
    如果 读取窗口("窗口2")=空 则
        保存窗口("窗口2",创建 窗口2)
    结束 如果
    切换窗口(读取窗口("窗口2"))
结束 事件

窗口1代码

 

 

事件 窗口1.切换完毕()
    弹出提示("窗口1切换完毕")
结束 事件

事件 按钮1.被单击()
    切换窗口(读取窗口("主窗口"))
结束 事件

事件 窗口1.按下某键(键代码 为 整数型,传址 屏蔽 为 逻辑型)
    如果 键代码 = 返回键 则
        切换窗口(读取窗口("主窗口"))
    结束 如果
结束 事件

 

 

窗口2代码

事件 窗口2.切换完毕()
    
结束 事件

事件 按钮1.被单击()
    切换窗口(读取窗口("主窗口"))
结束 事件

事件 窗口2.按下某键(键代码 为 整数型,传址 屏蔽 为 逻辑型)
    如果 键代码 = 返回键 则
        切换窗口(读取窗口("主窗口"))
    结束 如果
结束 事件