qq2006中怎样取得发送消息窗口中的Richedit

检举|2006-11-10 02:20hzp997 | 分类：Windows | 浏览1695次

学习编程中想让程序可以自动在QQ的发送消息框中自动发送消息，但在QQ2006中好象发送消息框中的RICHEDIT加密了，用这样的方法的不到了，请高手看下如下代码：
fLastWin := FindWindowEx(GetForegroundWindow, THandle(nil), '#32770', nil);if fLastWin = 0 then Exit;//fButton := FindWindowEx(GetForegroundWindow, THandle(nil),nil,'发送(&S)');//if fButton=0 then Exit;（这个发送按扭也找不到，所以暂时没有用）fLastWin := FindWindowEx(fLastWin, THandle(nil),'AfxWnd42',nil);if fLastWin=0 then Exit;label2 .Caption:=('以上条件成立');//在这里时还可以提示成立//fLastWin := FindWindowEx(fLastWin, THandle(nil),'RICHEDIT',nil);//if fLastWin=0 then Exit;label2 .Caption:=('以上条件成立');//但在这里就不行了SendMessage(RICHEDIT,EM_REPLACESEL,180,Integer(Pchar(Edit1.TEXT)));请各位大侠指点小弟！多谢

label2 .Caption:=('以上条件成立');
这一句没有同时出现两次，而是我把它放到不同位置进行测试，以检验那一句不能通过

我有更好的答案

提问者采纳

2006-11-10 11:50

以下是从网上找的一段代码，你可以试下，FindWindow用法说得有误，第一个参数应该是类名，第二个是窗口名，也即是标题。你自己改下吧。varWnd: HWND;
begin// 查找标题为123，类名是#32770的窗口Wnd := FindWindow('123', '#32770');if Wnd <> 0 then begin// 查找文本是'Edit1'，类名是EDIT的子窗口Wnd := FindWindowEx(Wnd, 0, 'Edit1', 'EDIT');if Wnd <> 0 then SetWindowText(Wnd, PChar('Test');end;
end;你也可以用Spy++之类的察看目标EDIT的Identifier(ID)varWnd: HWND;
constID: 123;
begin// 查找标题为123，类名是#32770的窗口Wnd := FindWindow('123', '#32770');if Wnd <> 0 then beginWnd := GetDlgItem(Wnd, ID);if Wnd <> 0 then SetWindowText(Wnd, PChar('Test');end;
end;具体的查查MSDN吧

提问者评价

xie

评论|0

懒虫007 |十二级采纳率43%

擅长：其他编程语言数据库DBWindowsVB

AfxWnd42 qq2006中怎样取得发送消息窗口中的Richedit相关推荐

微信小程序在开发者工具中能收到发送消息，手机预览不能获取发送消息
如题,开发微信小程序时,发现在开发者工具中能正常发送收到消息,而在真机中不打开调试模式的情况下不能发送获取消息,找了半天文档终于找到了原因: 服务器域名配置原因引起的在没设置服务器域名的时候不开启上 ...
在idea中往Kafka发送消息失败
今天在学习Kafka整合Springboot项目的时候,往Kafka发送消息,消费者一直消费不到,ip地址,端口号,防火墙的状态都没有发现问题.后来发现是因为idea没有连接到虚拟机的,一直在找本机的 ...
Unity3D 游戏引擎之IOS高级界面发送消息与Unity3D消息的接收（九）
Unity3D 游戏引擎之IOS高级界面发送消息与Unity3D消息的接收雨松MOMO原创文章如转载,请注明:转载自雨松MOMO的博客原文地址:http://blog.csdn.net/xys289 ...
Java使用多线程发送消息
在后台管理用户信息的时候,经常会用到批量发送提醒消息,首先想到的有: (1).循环发送列表,逐条发送.优点是:简单,如果发送列表很少,而且没有什么耗时的操作,是比较好的一种选择,缺点是:针对大批量的发 ...
Worktile 中百万级实时消息推送服务的实现
Worktile 中百万级实时消息推送服务的实现转自:http://www.360doc.com/content/15/0907/19/1073512_497529854.shtml 这是一个创建于 ...
【tio-websocket】3、tio-websocket-server实现任何地方都能对用户发送消息
上一篇文章中,咱们已经成功搭建了咱们的 websocket 服务器,并能够与服务器之间成功通信,本篇文章将带领大家实现任何地方都能对用户发送消息 1.原理解析 tio-websocket-server ...
iOS——向NSNull和nil发送消息
NSNULL ? 什么是NSNull,看上去他和nil应该都表示空,不过nil是一个空指针,而NSNull是继承NSObject的一个类. 在网上查了一些资料,大部分解释是NSNull代表了在集合对象 ...
ssm配置socket_ssm框架中集成websocket实现服务端主动向客户端发送消息
找了很多配置文档及实例说明,也还是没能成功,最终在csdn博客中发现了基于stomp的消息推送的文章, 下面整理自csdn博客,https://blog.csdn.net/u013627689/art ...
Android笔记（三十一）Android中线程之间的通信（三）子线程给主线程发送消息...
先看简单示例:点击按钮,2s之后,TextView改变内容. package cn.lixyz.handlertest;import android.app.Activity; import andr ...

AfxWnd42 qq2006中怎样取得发送消息窗口中的Richedit

qq2006中怎样取得发送消息窗口中的Richedit

AfxWnd42 qq2006中怎样取得发送消息窗口中的Richedit相关推荐

最新文章

热门文章