遍历所有控件,批量保存标签、批量操作编辑框,读取所有标签(易语言)
这几天用易语言写一些工作上的数据显示小软件,因为软件上标签与编辑框较多,如果一 一去读取和保存的话,程序显得很冗长,并且扩展性不好,增加或删减1,2个控件,程序又得重新检查重写,而网上查了半天,关于易的批量操作控件,估计是太少人用吧,找不到。好吧,实在是找不着,就自己尝试写吧,偷懒不了。
经过测试,写出来了,顺道给大家分享一下,希望对大家有所帮助吧。
这里以启动窗口(主窗口)的所有标签操作举例,其他的大家举一反三即可。
新建一个子程序,主要功能是把启动窗口所有标签显示的标题内容,写到一个返回文本,后面可以用来保存、传输等。
以下为子程序的截图:
以下是子程序的复制:
.版本 2
.子程序 遍历标签_写到文本00, 文本型 .局部变量 控件句柄, 整数型 .局部变量 控件类型名称, 文本型 .局部变量 N, 整数型 .局部变量 成员组, 文本型, , "0" .局部变量 返回文本, 文本型
返回文本 = #空文本 ' 置空返回文本,如果没有找到任何值,定义返回空 控件类型名称 = “标签” ' 如果是编辑框,就把名称变为编
共有 0 条评论