怎么让易语言透明标签可以复制
3个回答
展开全部
楼主说的可是复制组件?
.版本 2
.支持库 iext
.程序集 窗口程序集1
.程序集变量 tmbq, 透明标签, , "0"
.子程序 __启动窗口_创建完毕
透明标签1.可视 = 假
透明标签1.宽度 = 100
透明标签1.高度 = 24
.子程序 _按钮1_被单击
.局部变量 n, 整数型
n = 取数组成员数 (tmbq) + 1
重定义数组 (tmbq, 真, n)
复制窗口组件 (透明标签1, tmbq [n])
tmbq [n].顶边 = (n - 1) × 30
tmbq [n].标题 = “新透明标签” + 到文本 (n)
tmbq [n].可视 = 真
.版本 2
.支持库 iext
.程序集 窗口程序集1
.程序集变量 tmbq, 透明标签, , "0"
.子程序 __启动窗口_创建完毕
透明标签1.可视 = 假
透明标签1.宽度 = 100
透明标签1.高度 = 24
.子程序 _按钮1_被单击
.局部变量 n, 整数型
n = 取数组成员数 (tmbq) + 1
重定义数组 (tmbq, 真, n)
复制窗口组件 (透明标签1, tmbq [n])
tmbq [n].顶边 = (n - 1) × 30
tmbq [n].标题 = “新透明标签” + 到文本 (n)
tmbq [n].可视 = 真
展开全部
看问题应该是要复制透明标签的文本,而不是推荐答案所说的复制组件.
你可以考虑用其他思路.如:
方法一:
在透明标签右键弹起事件中,弹出右键菜单,可选择复制.这个是比较容易实现的.
方法二:
在窗口中添加一个隐藏的只读编辑框,大小,位置和内容都跟透明标签一样.
当双击透明标签时,显示该编辑框,可进行文本复制.焦点离开编辑框,则自动隐藏.
你可以考虑用其他思路.如:
方法一:
在透明标签右键弹起事件中,弹出右键菜单,可选择复制.这个是比较容易实现的.
方法二:
在窗口中添加一个隐藏的只读编辑框,大小,位置和内容都跟透明标签一样.
当双击透明标签时,显示该编辑框,可进行文本复制.焦点离开编辑框,则自动隐藏.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
没人回答的
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询