|

我自己生成出来在我XP虚拟机是可以使用的,但是关闭程序后会报错
在我win10电脑使用就直接停止工作,在E里面运行就出现EDV****.tmp 这个错误,我代码发上来,麻烦大哥大姐们看下 谢谢
贴上代码
.版本 2
.程序集 程序集_启动
.程序集变量 Flash窗口, Flash窗口类
.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
Flash窗口.事件_交互 (&_Flash窗口_交互)
Flash窗口.创建 (#Swf文件, &_Flash窗口_创建完毕)
返回 (0) ' 可以根据您的需要返回任意数值
.子程序 _Flash窗口_创建完毕
' Flash窗口.可视 (真)
.子程序 _Flash窗口_交互
.参数 标识, 文本型
.参数 数据, 文本型
.局部变量 数据数组, 文本型, , "0"
.局部变量 宽度, 整数型
.局部变量 高度, 整数型
.判断开始 (标识 = “resize”) ' 大小
数据数组 = 分割文本 (数据, “,”, )
Flash窗口.取桌面大小 (宽度, 高度)
Flash窗口.移动 ((宽度 - 到整数 (数据数组 [1])) ÷ 2, (高度 - 到整数 (数据数组 [2])) ÷ 2, 到整数 (数据数组 [1]), 到整数 (数据数组 [2]))
Flash窗口.可视 (真)
.判断 (标识 = “playing”) ' 播放
.判断 (标识 = “showweb”) ' 显示网页
.判断 (标识 = “end”) ' 结束
.判断 (标识 = “start”) ' 开始
信息框 (“您点击了 start 按钮”, 0, )
.判断 (标识 = “minimal”) ' 最小化
Flash窗口.最小化 ()
.判断 (标识 = “register”) ' 注册
Flash窗口.打开网站 (“www.126.com”)
.判断 (标识 = “setting”) ' 设置
.判断 (标识 = “charge”) ' 充值
Flash窗口.打开网站 (“www.qq.com”)
.判断 (标识 = “repair”) ' 修复
Flash窗口.打开网站 (“www.baidu.com”)
.判断 (标识 = “moving”) ' 移动
Flash窗口.随意移动 ()
.判断 (标识 = “quit”) ' 退出
Flash窗口.销毁 ()
.默认
.判断结束
附上模块
FLASH窗口模块.rar
(54.69 KB, 下载次数: 1)
补充内容 (2017-12-3 06:25):
很急,能帮忙解决 可私聊发红包 谢谢 |
|