张志峰的博客

水滴石川,积少成多。

导航

随笔分类 -  Delphi 控制键盘 键盘HOOK

摘要:= 'Repeat %s(&' + #32 + ')'; //设置快捷键 这个是设置空格的 如果设置字符, 就可以这样写= 'Repeat %s(&H)‘ const SRepeatCmdCaption_TME = 'Repeat %s(&' + #32 + ')'; //设置快捷键 SRepeat 阅读全文

posted @ 2017-12-18 17:43 ╰★张志峰★╮ 阅读(1337) 评论(0) 推荐(0)

摘要:GetKeyState(VK_CAPITAL) & 0x00010x8000 是键有否按下0x0001 是键的翻转状态 var bF1Down: Boolean;begin bF1Down := (GetKeyState(VK_SPACE) and $8000 > 0); 阅读全文

posted @ 2017-12-12 13:33 ╰★张志峰★╮ 阅读(888) 评论(0) 推荐(0)

摘要:delphi设计浮动窗口 用过Photoshop的朋友一定对它的那些方便的浮动面板记忆犹新,其实这些面板就是一个个的小窗体,但这些小窗体都放在Photoshop的主窗体上 (不是存在主窗体中),有自己的标题栏、最小化按钮及最大化按钮。但它们与MDI程序不同的是,他们可以拖到主窗体外,更重要的是工作中 阅读全文

posted @ 2016-07-05 14:17 ╰★张志峰★╮ 阅读(1060) 评论(0) 推荐(0)

摘要:{ 作者: han 日期: 2006.06.02 } unit softkey; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, RxGIF, Ext 阅读全文

posted @ 2016-07-05 13:52 ╰★张志峰★╮ 阅读(1621) 评论(0) 推荐(0)

摘要:http://blog.sina.com.cn/s/blog_502b2e970100949s.html http://blog.sina.com.cn/s/blog_502b2e970100949s.html 获取键盘输入以控制无法接受输入焦点的控件考虑一些游戏,显示图片在TPainBox,但是T 阅读全文

posted @ 2016-07-05 13:52 ╰★张志峰★╮ 阅读(2508) 评论(0) 推荐(0)