本帖最后由 怀念ob 于 2024-2-16 20:43 编辑
只是样式,用起来还不够灵活,需要的自己魔改下吧
<火山程序 类型 = "通常" 版本 = 1 /> 方法 弹窗_VX <类型 = 中部弹窗容器 折叠> 参数 提示内容 <类型 = 文本型> 参数 按钮标题1 <类型 = 文本型> 参数 按钮标题2 <类型 = 文本型> { 变量 弹窗 <类型 = 中部弹窗容器> 变量 XX布局_弹窗_主界面 <类型 = 线性布局器 布局方向 = 纵向> 变量 XX布局_弹窗_文本框 <类型 = 线性布局器 布局方向 = 纵向> 变量 XX布局_弹窗_文本框_内 <类型 = 线性布局器 布局方向 = 横向> 变量 XX布局_弹窗_按钮 <类型 = 线性布局器 布局方向 = 横向> 变量 wx按钮1 <类型 = 按钮 文本字体 = 通常粗体 文本对齐模式 = 居中 内容 = "仍然关注" 文本字体尺寸 = 16 背景图 = "..\\..\\..\\图片素材\\an_wxz_z_r6.xml"> 变量 wx按钮2 <类型 = 按钮 文本字体 = 通常粗体 文本对齐模式 = 居中 内容 = "不再关注" 文本字体尺寸 = 16 文本颜色 = 颜色类.红色 背景图 = "..\\..\\..\\图片素材\\an_wxz_y_r6.xml"> 变量 弹窗_主界面_背景图 <类型 = 可绘制资源 值 = "..\\..\\..\\图片素材\\bj_qh_r6.xml"> 变量 弹窗_提示文本框 <类型 = 文本框 文本颜色 = 颜色类.黑色 文本字体尺寸 = 15> 变量 屏幕信息 <参考 类型 = 屏幕度量信息类> 变量 文本框高度 <类型 = 整数> 变量 弹窗高度 <类型 = 整数> 变量 弹窗宽度 <类型 = 整数> 变量 线条1 <类型 = 线性布局器 背景色 = 0xFFD3D3D3> 变量 线条2 <类型 = 线性布局器 背景色 = 0xFFD3D3D3> 屏幕信息 = 屏幕度量信息类.获取 () 文本框高度 = 屏幕信息.高度 / 100 * 25 / 100 * 75 弹窗高度 = 屏幕信息.高度 / 100 * 25 弹窗宽度 = 屏幕信息.宽度 / 100 * 90 // 获取屏幕的宽度高度- XX布局_弹窗_文本框.置需求宽度 (窗口组件.填满父组件) XX布局_弹窗_文本框.置需求高度 (文本框高度) XX布局_弹窗_文本框.内容水平对齐方式 = 水平对齐方式.居中 XX布局_弹窗_文本框.背景色 = 颜色类.透明色 // 设置文本框外层布局器的样式居中- XX布局_弹窗_文本框_内.置需求高度 (文本框高度) XX布局_弹窗_文本框_内.内容垂直对齐方式 = 垂直对齐方式.居中 XX布局_弹窗_文本框_内.背景色 = 颜色类.透明色 // 设置文本框内部布局器样式居中- 弹窗_提示文本框.内容 = 提示内容 弹窗_提示文本框.文本对齐模式 = 组件文本对齐模式.居中 弹窗_提示文本框.内容水平对齐方式 = 水平对齐方式.居中 弹窗_提示文本框.内容垂直对齐方式 = 垂直对齐方式.居中 弹窗_提示文本框.置需求宽度 (屏幕信息.宽度 / 100 * 90 / 100 * 80) // 设置文本框自身的样式- XX布局_弹窗_文本框_内.添加子组件 (弹窗_提示文本框, ) XX布局_弹窗_文本框.添加子组件 (XX布局_弹窗_文本框_内, ) // XX布局_弹窗_主界面.内容水平对齐方式 = 水平对齐方式.居中 XX布局_弹窗_主界面.添加子组件 (XX布局_弹窗_文本框, ) wx按钮1.置需求宽度 (屏幕信息.宽度 / 100 * 90 / 2 - 1) wx按钮2.置需求宽度 (屏幕信息.宽度 / 100 * 90 / 2) 线条1.置需求高度 (2) 线条1.置需求宽度 (窗口组件.填满父组件) 线条2.置需求高度 (弹窗高度 - 文本框高度) 线条2.置需求宽度 (1) XX布局_弹窗_主界面.添加子组件 (线条1, ) wx按钮2.置需求高度 (弹窗高度 - 文本框高度 - 2) wx按钮1.置需求高度 (弹窗高度 - 文本框高度 - 2) wx按钮1.内容 = 按钮标题1 wx按钮2.内容 = 按钮标题2 XX布局_弹窗_按钮.添加子组件 (wx按钮1, ) XX布局_弹窗_按钮.添加子组件 (线条2, ) XX布局_弹窗_按钮.添加子组件 (wx按钮2, ) XX布局_弹窗_主界面.添加子组件 (XX布局_弹窗_按钮, ) XX布局_弹窗_主界面.背景图 = 弹窗_主界面_背景图 弹窗.弹窗背景色 = 颜色类.透明色 弹窗.像素单位 = 真 弹窗.初始化 (XX布局_弹窗_主界面, 弹窗高度, 弹窗宽度, 真) 弹窗.弹出 (本对象) 挂接事件 (wx按钮1, 1000) 挂接事件 (wx按钮2, 1001) 返回 (弹窗) }
|