当前位置:首页 > 文章中心 > 正文内容

「按键精灵安卓版」脚本界面上多选框的一键全选与取消全选

dgx6662个月前 (05-15)文章中心11

大家好,我是公众号3分钟学堂的郭立员~

今天要实现的功能是脚本界面上多选框的一键全选与取消全选,效果如图所示:

基本思路:

一、使用uip.SetAttribute命令设置多选框的选中状态

二、由于一个按钮有两个功能,所以要判断按钮的状态,在修改多选框之前,先获取按钮上的文字,如果文字是全选,就执行多选框勾选,如果文字是取消全选,就执行多选框取消勾选。

例子界面源码:

界面1:
{
  标签页1:
  {
    多选框:
    {
      名称:"多选框1",
      提示内容:"提示用户的文字内容",
      点击响应:"函数名1",
      选中:false,
      文字大小:0,
      高度:0,
      宽度:0,
      注释:"文字大小、高度、宽度是可选属性,如需使用默认值,可保持值为0或直接删除此属性"
    },  
    多选框:
    {
      名称:"多选框2",
      提示内容:"提示用户的文字内容",
      点击响应:"函数名1",
      选中:false,
      文字大小:0,
      高度:0,
      宽度:0,
      注释:"文字大小、高度、宽度是可选属性,如需使用默认值,可保持值为0或直接删除此属性"
    },  
    多选框:
    {
      名称:"多选框3",
      提示内容:"提示用户的文字内容",
      点击响应:"函数名1",
      选中:false,
      文字大小:0,
      高度:0,
      宽度:0,
      注释:"文字大小、高度、宽度是可选属性,如需使用默认值,可保持值为0或直接删除此属性"
    },  
    多选框:
    {
      名称:"多选框4",
      提示内容:"提示用户的文字内容",
      点击响应:"函数名1",
      选中:false,
      文字大小:0,
      高度:0,
      宽度:0,
      注释:"文字大小、高度、宽度是可选属性,如需使用默认值,可保持值为0或直接删除此属性"
    },  
    按钮:
    {
      名称:"按钮1",
      显示内容:"全选",
      点击响应:"全选",
      文字大小:0,
      高度:0,
      宽度:0,
      注释:"文字大小、高度、宽度是可选属性,如需使用默认值,可保持值为0或直接删除此属性"
    },  
  
  },  


}


函数源码:

Function 全选()
    dim tb=UIP.GetAttribute ("按钮1")
    If tb["显示内容"] = "全选" Then 
        UIP.SetAttribute("多选框1",{"选中":true})
        UIP.SetAttribute("多选框2",{"选中":true})
        UIP.SetAttribute("多选框3",{"选中":true})
        UIP.SetAttribute "多选框4", {"选中":true}
        UIP.SetAttribute "按钮1", {"显示内容":"取消全选"}
    Else 
        UIP.SetAttribute("多选框1",{"选中":false})
        UIP.SetAttribute("多选框2",{"选中":false})
        UIP.SetAttribute("多选框3",{"选中":false})
        UIP.SetAttribute "多选框4", {"选中":false}
        UIP.SetAttribute "按钮1", {"显示内容":"全选"}
    End If
End Function


=正文完=

扫描二维码推送至手机访问。

版权声明:本文由第六芝士网发布,如需转载请注明出处。

本文链接:http://www.dgx666.com/post/1637.html

分享给朋友:

“「按键精灵安卓版」脚本界面上多选框的一键全选与取消全选” 的相关文章

《计算机辅助设计AutoCAD2004教案》2014版

《计算机辅助设计AutoCAD2004教案》2014版《计算机辅助设计AutoCAD2004简明教案》那荣革2014年3月5日计算机教研室第一讲 软件介绍课 题:软件介绍课堂类型:讲 授教学目的:1、软件介绍2、基本功能3、运行环境教学要求:1、软件常识2、软件安装教学重点:1、软件介绍2、软件运行...

在安装Auto CAD时出现Allied product not found错误时怎么办

朋友在安装AutoCAD时不慎误删了一个文件夹,结果导致安装AutoCAD时总是跳出”allied product not found”的错误。如果在安装Auto CAD时出现Allied product not found错误时怎么办?请您先不要着急哦 奋斗的雷 来帮您解决目前遇到的问题.今天就已...

CAD安装失败,如何才能删除(卸载)CAD?7步就能完美卸载CAD软件

CAD安装失败,怎么样才能彻底删除CAD各种残留注册表?有时候我们想将CAD重新安装,但却显示CAD已经安装,但又不见CAD软件,然后我们就会发出这样的疑问:CAD无法重新安装是怎么一回事?下面电脑百科林老师就告诉大家CAD安装失败的原因,以及怎么操作才能把CAD完全卸载干净。想CAD重新安装,但却...

WampServer集成环境安装与配置

实习到了第三个礼拜了,原来我们小组是以开发php为主的,我们项目的服务器也是用php做的,因此我觉得很有必要学一下php的相关知识,首先当然是搭建环境了,写篇博客分享下经验。目录:1、vcredist_x64的下载安装:先打开wampserver的官网,http://www.wampserver....

JP-Word 又升级了

=====================================JP-Word v6.80相对于6.50的改变=====================================此次升级,进行了全方位的改进,在播放和动态谱方面更为突出,同时也修复了几个比较重要的bug。下面详述。(...

Qt https 程序运行异常

【1】问题现象描述利用QT的https方式访问服务器,添加了libeay32.dll 和 ssleay32.dll, 且一直都使用正常。正常现象:返回200,且该获取的值都正常返回(即replyByte不为空)。突然,有一天(不是很久很久以前.....),把打包的版本安装到销售的机器(系统比较纯净)...