TC官方合作论坛

标题: 求助编辑框换行问题，马上采纳 [打印本页]
作者: 20099371    时间: 2015-8-12 16:30
标题: 求助编辑框换行问题，马上采纳
想达到如图效果，请大神指教，先谢谢了[attach]21403[/attach]
这是代码：
  1. 变量 线程ID,w,e,r,d
  2. //从这里开始执行
  3. 功能 执行()
  4.     //从这里开始你的代码
  5. 结束
  6. //启动_热键操作
  7. 功能 启动_热键()
  8.     线程ID=线程开启("键盘发送字体","")
  9. 结束

  11. 功能 键盘发送字体()  
  12.     遍历(变量 i = 0; i < 10; i++)
  13.         w=w+1
  14.          r=编辑框获取文本("编辑框0")
  15.         编辑框设置文本("编辑框0",w)
  16.         调试输出(w)
  17.         等待(500)
  18.         e=编辑框获取文本("编辑框0")&","
  19.         d=r&e
  20.         编辑框设置文本("编辑框0",d)
  21.     结束
  22. 结束
  23. 功能 终止_热键()
  24.     线程关闭(线程ID)
  25. 结束
复制代码

作者: 言术    时间: 2015-8-12 16:46
  1. 变量 线程ID
  2. 功能 执行()
  3. 结束
  4. 功能 启动_热键()
  5.     线程ID=线程开启("键盘发送字体","")
  6. 结束

  8. 功能 键盘发送字体()  
  9.     遍历(变量 i = 1; i <= 10; i++)
  10.         编辑框设置文本("编辑框0",编辑框获取文本("编辑框0")&",\r\n"&i)
  11.         等待(500)
  12.     结束
  13. 结束
  14. 功能 终止_热键()
  15.     线程关闭(线程ID)
  16. 结束
复制代码
作者: 言术    时间: 2015-8-12 16:49
编辑框设置文本("编辑框0",编辑框获取文本("编辑框0")&i&",\r\n")
作者: 20099371    时间: 2015-8-12 16:50
谢谢哈
作者: 20099371    时间: 2015-8-12 17:02
  1. 变量 线程ID
  2. //从这里开始执行
  3. 功能 执行()
  4.     //从这里开始你的代码
  5. 结束
  6. //启动_热键操作
  7. 功能 启动_热键()
  8.     线程ID=线程开启("键盘发送字体","")
  9. 结束

  11. 功能 键盘发送字体()  
  12.     遍历(变量 i = 1; i <= 10; i++)
  13.         编辑框设置文本("编辑框0",编辑框获取文本("编辑框0")&i&","&"\r\n")
  14.         等待(500)
  15.     结束
  16. 结束
  17. 功能 终止_热键()
  18.     线程关闭(线程ID)
  19. 结束
复制代码
作者: 20099371    时间: 2015-8-12 17:03
这样效果要好些，谢谢你哈




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1