VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)

VB爱好者乐园(VBGood)

 找回密码
 立即注册
搜索
查看: 7331|回复: 26

出200元 RMB 求解决个问题 获得控件上的文字

[复制链接]
 楼主| 发表于 2010-3-1 23:09:27 | 显示全部楼层 |阅读模式
控件的类名是 ListCtrl 我要获得控件里的文字

求高手帮助 解决问题后立即打款

我发送 SendMessage LVM_GETITEMTEXT  返回是0

加QQ 42153930
头像被屏蔽
发表于 2010-3-2 00:56:52 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
回复 支持 反对

使用道具 举报

发表于 2010-3-2 09:05:53 | 显示全部楼层
解决问题后立即消失

提示一下:如果不是你的程序,
Sendmsg时那个接收地址有点特别,
你用自己进程的地址传过去是不对的,所以收不到

剩下的请自行研究……
回复 支持 反对

使用道具 举报

发表于 2010-3-2 09:34:56 | 显示全部楼层
呵呵,hwnd有问题
回复 支持 反对

使用道具 举报

发表于 2010-3-2 09:58:11 | 显示全部楼层
用金山词霸那个 取词的 工具,引用到vb中,就可以取词了,屏幕上任意位置的都可以取到,只要不是图片。。

我在上班,暂时没源代码,等下回家给你翻翻。。
回复 支持 反对

使用道具 举报

发表于 2010-3-2 10:23:04 | 显示全部楼层
本帖最后由 djrm_yb 于 2010-3-2 10:24 编辑

如果你装了金山词霸,可以这样
从“引用”中添加XdictGrb.dll

Option Explicit
Implements IXDictGrabSink
Private gp As GrabProxyPrivate Sub Form_Load()
   
      Set gp = New GrabProxy
   
With gp
      .GrabEnabled = True '是否有效
   
      .GrabInterval = 30 '指定抓取时间间隔
   
      .GrabMode = XDictGrabMouse '模式(鼠标是否加按键)
   
      .AdviseGrab Me '接口指向自身
End With
End Sub
Private Sub Form_Unload(Cancel As Integer)
      Set gp = Nothing
End Sub
Private Function IXDictGrabSink_QueryWord(ByVal WordString As String, ByVal lCursorX As Long, ByVal lCursorY As Long, ByVal SentenceString As String, lLoc As Long, lStart As Long) As Long
   
      Label1.Caption = "当前坐标:" & "(" & lCursorX & "," & lCursorY & ")"
      Label2.Caption = "当前语句:" & SentenceString
      Label3.Caption = "当前字符:" & Mid(SentenceString, lLoc + 1, 1000)
End Function

参考 http://hi.baidu.com/cavalry1/blog/item/70eaabde76b0df5acdbf1a7c.html
回复 支持 反对

使用道具 举报

发表于 2010-3-2 10:55:20 | 显示全部楼层
还用得着用他的控件么   获取鼠标点的句柄也就是一个API搞定的事
回复 支持 反对

使用道具 举报

发表于 2010-3-2 11:01:47 | 显示全部楼层
本帖最后由 bakurise 于 2010-3-2 11:07 编辑

http://black-feather.cn/post/49.shtml

你看看这个 是否有帮助

如果不行 加我细聊
回复 支持 反对

使用道具 举报

发表于 2010-3-2 11:20:57 | 显示全部楼层
还用得着用他的控件么   获取鼠标点的句柄也就是一个API搞定的事
bakurise 发表于 2010-3-2 10:55


说的好简单一样,你看看这个图,,明显就不对。取到的只是那个frame的标题, sendmessage取词出错了.jpg
注意,此时鼠标在Left Top 那几个文本框上,取到的不是文本框的次,而是外面那个frame
回复 支持 反对

使用道具 举报

发表于 2010-3-2 14:30:56 | 显示全部楼层
如果你装了金山词霸,可以这样
从“引用”中添加XdictGrb.dll

Option Explicit
Implements IXDictGrabSink
Private gp As GrabProxyPrivate Sub Form_Load()
   
      Set gp = New GrabProxy
   
With ...
djrm_yb 发表于 2010-3-2 10:23


必须安装吗,就下这个dll行不行啊,行的话给个地址我下下看
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

文字版|手机版|小黑屋|VBGood  

GMT+8, 2022-12-3 10:11

VB爱好者乐园(VBGood)
快速回复 返回顶部 返回列表