有没有大佬帮忙改一下这个源码 想封装个信息提示框来着 ...
跪谢了先把内容赋值给变量
然后再创建窗口
<火山程序 类型 = "通常" 版本 = 1 />
如果真 (皮肤类型 == 1)
{
信息框_白色.提示框_文本 = 提示文本
信息框_白色.提示框_标题 = 标题信息
信息框_白色.创建主窗口 ()
}
<火山程序 类型 = "通常" 版本 = 1 />
类 信息框类_白 <公开 基础类 = Exui窗口程序 折叠 隐藏值属性 = "0"
@设计内容 = "C:\\Users\\tomor\\Desktop\\火山类模块\\信息提示框_白_信息提示框_白_信息框_白_684F1D6AFEC544e7AE223535D6BE31D4.Exui">
{
变量 Exui界面资源 <公开 类型 = 火山.基本.视窗文件资源 值 = "信息框_白.Exui"
注释 = "Exui界面数据,若项目位置迁移或从其它地方下载界面不能打开或编译时请右键打开编辑器点击确定后会重新关联" @自动生成 = "exui">
变量 Exui主窗口 <公开 类型 = 火山.Exui.窗口Win 注释 = "窗口Win,由Exui界面编辑器生成请勿修改" @自动生成 = "exui">
变量 信息框_白 <公开 类型 = 火山.Exui.窗口Ex 注释 = "窗口Ex,由Exui界面编辑器生成请勿修改" @自动生成 = "exui">
变量 信息框_白_标题 <公开 类型 = 火山.Exui.标签Ex 注释 = "标签Ex,由Exui界面编辑器生成请勿修改" @自动生成 = "exui">
变量 信息框_白_图片框 <公开 类型 = 火山.Exui.图片框Ex 注释 = "图片框Ex,由Exui界面编辑器生成请勿修改" @自动生成 = "exui">
变量 信息框_白_文本 <公开 类型 = 火山.Exui.标签Ex 注释 = "标签Ex,由Exui界面编辑器生成请勿修改" @自动生成 = "exui">
变量 信息框_白_缓动任务 <公开 类型 = 缓动任务Ex>
变量 信息框_白_定时关闭 <公开 类型 = 时钟类_>
变量 提示框_标题 <公开 类型 = 文本型>
变量 提示框_文本 <公开 类型 = 文本型>
变量 ""
#
方法 窗口Win_创建完毕 <接收事件 类型 = 整数 折叠>
参数 来源对象 <类型 = 窗口Win 注释 = "提供事件产生的具体来源对象">
参数 标记值 <类型 = 整数 注释 = "用户调用\"挂接事件\"命令时所提供的\"标记值\"参数值,非此方式挂接事件则本参数值固定为0.">
参数 组件句柄 <类型 = 变整数>
参数 消息类型 <类型 = 变整数>
参数 透传参数1 <类型 = 变整数>
参数 透传参数2 <类型 = 变整数>
{
如果 (来源对象 == Exui主窗口)
{
信息框_白_标题.标题 = 提示框_标题
信息框_白_文本.标题 = 提示框_文本
信息框_白_缓动任务.创建 (3, , , , 5, 10, , , )
信息框_白_定时关闭.启动时钟_ (3000)
}
返回 (0)
}
方法 时钟类__周期事件_ <接收事件 类型 = 整数>
参数 来源对象 <类型 = 时钟类_ 注释 = "提供事件产生的具体来源对象">
参数 标记值 <类型 = 整数 注释 = "用户调用\"挂接事件\"命令时所提供的\"标记值\"参数值,非此方式挂接事件则本参数值固定为0.">
参数 时钟ID <类型 = 整数>
{
如果 (来源对象 == 信息框_白_定时关闭)
{
信息框_白_定时关闭.周期事件_ (1)
信息框_白_定时关闭.停止时钟_ ()
信息框_白.销毁 ()
}
返回 (0)
}
方法 缓动任务Ex_缓动任务事件 <接收事件 类型 = 整数 注释 = "" 返回值注释 = "部分事件可阻止时返回1 阻止 0放行">
参数 来源对象 <类型 = 缓动任务Ex 注释 = "提供事件产生的具体来源对象">
参数 标记值 <类型 = 整数 注释 = "用户调用\"挂接事件\"命令时所提供的\"标记值\"参数值,非此方式挂接事件则本参数值固定为0.">
参数 任务句柄 <类型 = 变整数>
参数 事件类型 <类型 = 变整数 注释 = "可参考 缓动事件_ 常量">
参数 任务索引 <类型 = 变整数>
参数 缓动结果 <类型 = 变整数>
参数 缓动进度 <类型 = 变整数>
参数 附加数值 <类型 = 变整数>
{
如果 (来源对象 == 信息框_白_缓动任务)
{
分支判断 ((整数)事件类型)
{
分支 (1)// 即将开始新一轮计算通知
{
信息框_白_缓动任务.置配置 (0, 缓动模式.三次方缓动_Out, 信息框_白_标题.左边 + 200, 信息框_白_标题.左边)
信息框_白_缓动任务.置配置 (1, 缓动模式.三次方缓动_Out, 信息框_白_文本.左边 + 200, 信息框_白_文本.左边)
信息框_白_缓动任务.置配置 (2, 缓动模式.三次方缓动_Out, 信息框_白.左边 + 200, 信息框_白.左边)
}
分支 (2)// 开始一轮计算通知
{
}
分支 (3)// 计算结果通知
{
如果真 (任务索引 == 0)
{
信息框_白_标题.左边 = (整数)缓动结果
返回 (0)
}
如果真 (任务索引 == 1)
{
信息框_白_文本.左边 = (整数)缓动结果
返回 (0)
}
如果真 (任务索引 == 2)
{
信息框_白.左边 = (整数)缓动结果
返回 (0)
}
}
分支 (4)// 结束一轮计算通知
{
信息框_白.更新缓存 ()// 更新组件缓存
}
分支 (5)// 计算完成通知
{
}
}
返回 (0)
}
返回 (0)
}
}
此处应该有鼓励~
页:
[1]