易语言 取剪切板文本

Posted 2023-05-11

我想取鼠标位置已选中的文本 但是信息框 编辑框 会显示我前一次复制的文本 我在点一次 按钮 才能显示我要复制的文本。。
.版本 2
.支持库 eAPI

模拟鼠标点击 (1208, 252, 1)
模拟鼠标点击 (1208, 252, 2)
模拟按键 (#C键, , )
处理事件 ()
编辑框1.内容 ＝ 取剪辑板文本 ()
信息框 (取剪辑板文本 (), 0, )

不用复制，直接：取窗口标题

加个窗口程序集变量：文本，文本型

文本=取窗口标题（取鼠标所在窗口句柄（）） ‘之前的文本
然后再复制了，变量还是存在的
编辑框1.内容=文本 参考技术A 你的模拟按键是不是少了个按键状态？ #Ctrl键？ 参考技术B 你写这个想要什么效果,目的是什么说下.追问

效果就是 把我鼠标选中的 文本 复制到我的编辑框里

易语言 错误(10044): 不能将“文本型 数组”数据转换到“通用型”数据。

RT错误(10044): 不能将“文本型 数组”数据转换到“通用型”数据。
求问错误在哪。 然后帮忙检查一下这样是否可以做到窗口排列。或者有什么更好的办法。

.版本 2
.支持库 eAPI

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

标签5.标题 ＝ 到文本 (取屏幕宽度 ())
标签6.标题 ＝ 到文本 (取屏幕高度 ())
.如果 (文件是否存在 (取运行目录 () ＋ “/Config.txt”) ＝ 真)
文件号 ＝ 打开文件 (取运行目录 () ＋ “/Config.txt”, , )
文件内容 ＝ 读入文本 (文件号, )
窗口宽度 ＝ 到整数 (分割文本 (文件内容, , 1))
窗口高度 ＝ 到整数 (分割文本 (文件内容, , 2))
C_X ＝ 0
C_Y ＝ 0
C_K ＝ 窗口宽度
C_G ＝ 窗口高度
.否则
.如果 (信息框 (“没有配置文件，程序将自动排列窗口。”, #确认取消钮, ) ＝ #确认钮)

.否则

.如果结束

.如果结束
窗口句柄组 ＝ 取所有窗口列表 ()
Num ＝ 0
.计次循环首 (取数组成员数 (窗口句柄组), n)
项目 ＝ 取窗口标题 (到整数 (窗口句柄组 [n]))
.如果真 (项目 ＝ “记事本”)
Num ＝ Num ＋ 1
.如果 (Num ＝ 1)
移动外部窗口 (项目, 0, 0, C_K, C_G, 0)
.否则
C_X ＝ C_X ＋ 窗口宽度
.如果真 (窗口宽度 ＞ 标签5.标题)
C_Y ＝ C_Y ＋ 窗口高度
.如果真结束
移动外部窗口 (项目, C_X, C_Y, C_K, C_G, 0)

.如果结束

.如果真结束

.计次循环尾 ()
.如果 (Num ＞ 0)
信息框 (“排列完成。”, 0, Num)
.否则
信息框 (“未找到窗口。”, 0, Num)
.如果结束

.版本 2

.全局变量 C_X, 整数型
.全局变量 C_Y, 整数型
.全局变量 C_K, 整数型
.全局变量 C_G, 整数型
.全局变量 Num, 整数型
.全局变量 文件号, 整数型
.全局变量 文件内容, 文本型
.全局变量 窗口宽度, 整数型
.全局变量 窗口高度, 整数型
.全局变量 窗口句柄组, 字节集
.全局变量 n, 整数型
.全局变量 项目, 整数型

.版本 2

.DLL命令 取外部窗口句柄, 整数型, , "FindWindowA"
.参数 参数, 整数型, , 0
.参数 窗口标题, 文本型

.DLL命令 移动外部窗口, , , "MoveWindow"
.参数 外部窗口句柄, 整数型
.参数 新的X位置, 整数型
.参数 新的Y位置, 整数型
.参数 窗口的新宽度, 整数型
.参数 窗口的高宽, 整数型
.参数 是否重画窗口, 整数型, , 如窗口此时应重画，则设为1，0则表明应用程序会自己决定是否重画窗口

参考技术A <?php
if($_POST['login'])


?>

<form ......>

<input type='text'..../>
<button type="submit' name="login" />
</form> 参考技术B 你可以看看跳转到哪里停下提示的 然后我在来看看