标题:外部文本窗口,获取选取已选择文字内容,EM_GETSEL、EM_GETSELTXT 怎么用呀
只看楼主
xxz_1
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2018-5-20
结帖率:0
已结贴  问题点数:20 回复次数:4 
外部文本窗口,获取选取已选择文字内容,EM_GETSEL、EM_GETSELTXT 怎么用呀
1、VB6.0 中想获取外部程序运行后文本框内的已选择的文字,显示在vb6.0编写的主界面的控件TextBox内。
选择文字由外部程序决定,选择大小长度不确定(有可能是几个字或者几行),显示10秒左右后,从光标又开始选择,依次选完整篇文本。
2、研究学习了一下,主窗口、子窗口的句柄已编好,经调式能运行了。
3、获取外部文字内容,经上网查询资料,SendMessage、EM_GETSELTXT、 EM_GETSEL比较接近想法。
4、EM_GETSEL = &HB0,不知EM_GETSELTXT在vb6.0中能不能用?找不到他的常量值
--------------------------------------------------------------------------
假如主程序中TextBox控件为Text1.Text,外部程序已选中的文字要怎么传给Text1.Text?
搜索更多相关主题的帖子: 外部 文本 获取 选择 文字 
2018-05-20 09:25
suzhanpeng
Rank: 4
等 级:业余侠客
威 望:7
帖 子:72
专家分:248
注 册:2016-9-28
得分:20 
换个思路,用模拟键盘的复制和粘贴能实现吗?
2018-05-20 16:09
xxz_1
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2018-5-20
得分:0 
要自动获取
2018-05-20 18:37
xxz_1
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2018-5-20
得分:0 

Private Sub Command3_Click()
Dim i As Long, j As Long
Dim lParam As Long, wParam As Long
Dim k As Long
i = SendMessage(Jj, EM_GETSEL, wParam, lParam)
Text1.Text = i
Text2.Text = wParam
Text3.Text = lParam
End Sub
2018-05-20 18:38
xxz_1
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2018-5-20
得分:0 
wParam这个值怎么弄一直都是0呢?
lParam这个值到准确,会随光标变动。
2018-05-20 18:40



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-487087-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.102800 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved