Question

易语言怎样复制列表框多行内容 代码

怎样复制列表框多行内容 代码

置剪辑板文本 (列表框2.取项目文本 (列表框2.现行选中项))
这个命令是只复制选中一行的。我想点击复制按钮就能复制列表框的全部内容
怎样点击复制按钮就能复制列表框的全部内容到剪辑版

Answer 1

Hi,又是我回答你的问题
.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 iCount, 整数型
.局部变量 str, 文本型, , "100"
.计次循环首 (列表框2.取项目数 (), iCount)
str [iCount] ＝ 列表框2.取项目文本 (iCount － 1)
.计次循环尾 ()
iCount ＝ 0
.计次循环首 (列表框2.取项目数 (), iCount)
编辑框1.加入文本 (str [iCount] ＋ #换行符)
.计次循环尾 ()
置剪辑板文本 (编辑框1.内容)