易安卓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.按下某键(键代码 为 整数型,传址 屏蔽 为 逻辑型)
如果 键代码 = 返回键 则
切换窗口(读取窗口("主窗口"))
结束 如果
结束 事件
转载自原文链接, 如需删除请联系管理员。
原文链接：易安卓E4A载入创建新窗口，转载请注明来源！