空间 任意txt转换成测试文本
功能 逻辑型 开始_点击()
字符型 存储句柄a
整型 a
字符型 窗口句柄
字符型 窗口集=窗口.枚举窗口("txt")
整型 位置
位置=字符串.查找字符(窗口集,124)
循环(真)
窗口句柄=字符串.截取(窗口集,位置,0)
存储句柄a=窗口句柄
窗口集 = 字符串.移除(窗口集,位置+1,真)
a=a+1
如果(字符串.比较(窗口句柄,窗口集) == 0)
跳出
如果结束
循环结束
整型 窗口编号
循环(真)
窗口编号=转换.字符型转整型(存储句柄a)
如果(窗口编号 != 0)
窗口.设置标题(窗口编号,字符串.连接("测试文本",转换.整型转字符型(a)))
a=a-1
否则
跳出
辅助.消息框("没有找到txt窗口!")
如果结束
循环结束
返回 真
功能结束
功能 逻辑型 退出_点击()
辅助.退出()
返回 真
功能结束
空间结束
出错了:!出来个测试文本-6989不制止的话会变-6989 7000 -10000 |