再开一贴,DELPHI如何模拟按键 本帖最后由 kayoo 于 2012-02-14 01:28:05 编辑 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 postMessage(FindWindow(nil,'游戏标题'),wm_KEYDOWN,VK_SPACE,0); sendMessage(FindWindow(nil,'游戏标题'),wm_KEYDOWN,VK_SPACE,0);按住不动,就是循环发送这个消息, 用定时器间隔来发送。 windows都是消息处理机制,所有按键,鼠标都是消息。 用线程发送消息,2秒后结束线程,屏幕就不会假死SendMessage(handle,wm_keydown,vk_space,0);至于如何使用线程,自己找找資料吧 mouse_event(MOUSEEVENTF_LEFTDOWN,point.x,point.y,0,0); mouse_event(MOUSEEVENTF_LEFTUP,point.x,point.y,0,0);//在点point处产生鼠标左键单击动作(单击实质就是鼠标先按下后弹起) delphi做了个excel导入ACCESS的功能,怎么老是提示找不到ACCESS数据库? 改变图像中特定圆周的像素 求在treeview中遍历特定文件夹下的文件夹和文件的递归函数?急!多谢! 熟悉PB的delphi开发者朋友请进.... mscomm通讯问题,如何发送大于127的数字 请问TQuery控件怎样做到直接编辑? spcomm 如何接受字符? 如何将UNIX下生成的16进制文件转换为文本文件?? 关于多媒体播放的问题? 字符串 对于一个已经比较成熟的软件怎么维护 dream或者RO 做脚本引擎,怎么得到导入对象的方法、属性、时间列表
sendMessage(FindWindow(nil,'游戏标题'),wm_KEYDOWN,VK_SPACE,0);
按住不动,就是循环发送这个消息, 用定时器间隔来发送。 windows都是消息处理机制,所有按键,鼠标都是消息。
SendMessage(handle,wm_keydown,vk_space,0);至于如何使用线程,自己找找資料吧
mouse_event(MOUSEEVENTF_LEFTUP,point.x,point.y,0,0);
//在点point处产生鼠标左键单击动作(单击实质就是鼠标先按下后弹起)