知识大全 如何用Delphi写一个聊天辅助程序

Posted 讯息

篇首语:宁叫钱吃亏,不叫人吃亏。本文由小常识网(cha138.com)小编为大家整理,主要介绍了知识大全 如何用Delphi写一个聊天辅助程序相关的知识,希望对你有一定的参考价值。

如何用Delphi写一个聊天辅助程序  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!

procedure TForm Button Click(Sender: TObject);varhParent hButton hMemo: HWND;beginMemo SelectAll;//Memo内容全选Memo CopyToClipboard;//把Memo中选中的语句拷贝到剪贴板中try//找发送消息的QQ窗口hParent := FindWindow(nil 发送消息 );//然后找回话时用的编辑窗口 Point函数用于返回一个TPoint类型变量hMemo := ChildWindowFromPointEx(hParent Point( ) CWP_ALL);//找到 送讯息 按钮的句柄 hButton := FindWindowEx(hParent nil 送讯息(&S) );if (hParent = ) or (hMemo = ) or (hButton = ) thenMessageBox(Handle 没有找到发送窗口 请重试! 错误 MB_ICONWARNING)elsebegin//向发送消息中的回话编辑框发送粘贴消息SendMessage(hMemo WM_PASTE );//向 送讯息 按钮送单击消息以模仿按键发送回话SendMessage(hButton BM_CLICK );end;except//如果发生意外错误给出提示MessageBox(Handle 发送消息出错 请重试! 错误 MB_ICONWARNING);end;end;

cha138/Article/program/Delphi/201311/24922

相关参考

知识大全 用IE和SQL2k开发一个XML聊天程序

用IE和SQL2k开发一个XML聊天程序  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!  不同浏览

知识大全 用Delphi编制可自动升级程序

用Delphi编制可自动升级程序  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! 在编制了一个应用程

知识大全 用Delphi开发视频聊天软件(一)

用Delphi开发视频聊天软件(一)  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! &n

知识大全 用Delphi开发视频聊天软件(二)

用Delphi开发视频聊天软件(二)  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! &n

知识大全 用Delphi开发视频聊天软件(三)

用Delphi开发视频聊天软件(三)  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! &n

知识大全 用C#写一个下载程序

用C#写一个下载程序  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!cha138/Arti

知识大全 用Java写一个在线金山词霸程序

用Java写一个在线金山词霸程序  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!  代码贴上其它的就

知识大全 一个用JAVA写测算服务器响应速度程序

一个用JAVA写测算服务器响应速度程序  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!  任务描述 

知识大全 用ASP.Net写一个发送ICQ信息的程序

用ASP.Net写一个发送ICQ信息的程序  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!  这里我

知识大全 用51单片机做一个定时器,程序用C语言写,有人会吗

用51单片机做一个定时器,程序用C语言写,有人会吗?  以下文字资料是由(本站网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!用