新版UI的UI.GetValue如何使用?

leoX999 · 发表于 2020-4-23 07:44:25

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

本帖最后由 leoX999 于 2020-4-23 09:01 编辑

遇到两个问题:
1. 第一次触碰按钮没有反应
2. 第二次使用UI.GetValue能获取到值, 但是多按几下就全是null了
请问应该如何修改?

Dim SLOT_COUNT = 9
Dim BP_LIST() = Array("Lucky Band", "Luna")
//UI设置
Dim UI_HEIGHT = 1100
Dim UI_MAIN_NAME = "主UI"
Dim UI_COMMON_BUTTON_PAGE_HEIGHT = 200

Call CreateUI()

Function CreateUI()
      //创建新UI
UI.NewLayout UI_MAIN_NAME, 1, 1080, UI_HEIGHT

//设置分区
UI.AddTabHost UI_MAIN_NAME, "标签页1", UI_HEIGHT - UI_COMMON_BUTTON_PAGE_HEIGHT
UI.AddTab ("标签页1", "制作设定标签页","制作设定")
For index = 1 to SLOT_COUNT
      UI.AddSpinner "制作设定标签页", "tb_Slot" & index & "_BP", BP_LIST, 0
      UI.AddCheckBox "制作设定标签页", "cb_slot" & index & "CraftEnable", index, True
      UI.NewRow("制作设定标签页", "new_row_" & index)
Next
//底部按钮分区
UI.AddTabHost UI_MAIN_NAME, "通用按钮标签页", UI_COMMON_BUTTON_PAGE_HEIGHT
UI.AddTab ("通用按钮标签页", "通用按钮子标签页1","通用按钮")
UI.AddButton "通用按钮子标签页1", "关闭按钮", "关闭"
UI.SetOnClick "关闭按钮", 关闭脚本
      //显示界面
UI.Show (UI_MAIN_NAME)
End Function

Function 关闭脚本
      //测试获取第一个多选框数值
Dim elementId = "tb_Slot" & 1 & "_BP"
Dim temp = UI.GetValue(elementId)
TracePrint temp[elementId]

//测试获取第二个多选框数值
elementId = "tb_Slot" & 2 & "_BP"
temp = UI.GetValue(elementId)
TracePrint UI.gettext[elementId]

End Function

		自动登录	找回密码
密码			立即注册

[已回复] 新版UI的UI.GetValue如何使用?

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。