-
delphi:QQ自动发消息源码
Oct072008
这里面有的到窗口句柄，输入框句柄和按钮句柄的方法！
阅读全文
你可以结合使用的到你想的到的功能！
这是一个qq自动发送的功能，你看看，应该有点用吧！：）
[code]
procedure TForm1.Button1Click(Sender: TObject);
var
hParent,hButton,hMemo: HWND;
begin
Memo1.CopyToClipboard;//把Memo中选中的语句拷贝到剪贴板中
try
//找发送消息的QQ窗口
hParent := FindWindow(nil, ‘发送消息’);
//然后找回话时用的编辑窗口,Point函数用于返回一个TPoint类型变量
hMemo := ChildWindowFromPointEx(hParent, Point(50, 100), CWP_ALL);
//找到“送讯息”按钮的句柄
hButton := FindWindowEx(hParent,0,nil,’送讯息(&S)’);
if (hParent = 0) or (hMemo = 0) or (hButton = 0) then
MessageBox(Handle,’没有找到发送窗口，请重试！’,’错误’,MB_ICONWARNING)
else
begin
//向发送消息中的回话编辑框发送粘贴消息
SendMessage(hMemo,WM_PASTE,0,0);
//向“送讯息”按钮送单击消息以模仿按键发送回话
SendMessage(hButton,BM_CLICK,0,0);
end;
except
//如果发生以外错误给出提示抢沙发
-
delphi虚拟点击过360安全卫士
Sep202008
-
delphi李维专栏\3D游戏编程入门\3D游戏开发大全 站点
Jan292007
delphi 李维专栏 http://www.delphifans.com/SoftList/Catalog_12_SoftTime_Desc_1.html 3D游戏编程入门经典 http://book.csdn.net/bookfiles/199/ 3D游戏开发大全 http://book.csdn.net/bookfiles/27/index.html Delphi 3D 网： http://www.delphi3d.net/index.php 主要有OPENGL和Didirect这两种，还有就是使用第三方 ...
阅读全文
-
DELPHI MD5加密算法
Jan292007
-
delphi ADO 连接参数
Jan292007
-
用Delphi开发视频聊天软件
Jan192007
-
DELPHI实现远程屏幕抓取
Jan192007
-
Delphi 源程序格式书写规范
Jan192007
