久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

專注電子技術學習與研究
當前位置:單片機教程網 >> MCU設計實例 >> 瀏覽文章

delphi鍵盤鉤子(按鍵攔截程序源代碼)

作者:佚名   來源:本站原創   點擊數:  更新時間:2014年04月18日   【字體:

源碼下載: http://m.zg4o1577.cn/f/delphigoujiapan.rar 

                       超強悍的delphi鍵盤鉤子 說明
 
 本軟件可以截獲幾乎所有鍵值,例如:shift+?,ctrl+?,alt+?,F1~F12,shift或者ctrl或者alt  + F1~F12,單獨的 shift、ctrl、alt 鍵值,特殊鍵ins、del、caps lock、num lock、小鍵盤數字 等等,你只要稍作修改,也可以截獲 ctrl+alt+?等鍵值,沒有截獲不到的鍵值,本程序不使用dll方式,使用常規方式,方便你編譯調試修改,支持xp、vista、win7,是最強悍的鍵盤鉤子控件, 本軟件在delphi7下通過。


使用方法:
先點擊 按鈕 【安裝鍵盤鉤子】,然后memo編輯框就開始顯示所有的系統鍵盤消息了, 在 memo編輯框的onChange事件中編寫自己的 鍵盤消息接受主控制過程,其中 字符串mypresschar 返回總鍵值,它跟memo編輯框中顯示值是一樣的 ,例如 g、shift+g、ctrl+2、F9、alt+F9、 等等,其中 字符串shiftstr 返回 控制鍵 shift ctrl alt 的狀態,例如按下ctrl,則  shiftstr=‘ctrl’ ,否則=''。  


安裝方法:

本控件的核心源代碼在 unit2

首先 創建調用主窗體,假定是form1,在form1上放一個 memo控件(必須),然后創建一個新單元  如unit2,把我的unit2 單元的源代碼全部復制過去,做以下修改,首先確保form1使用 新單元 如unit2,并且unit2也使用form1。
在新單元unit2中 ,找到 函數 function KeyBHkHandle 過程,在其中找到以下兩條語句:

 // 在這里根據自己的情況修改
      form1.Memo1.Lines.Add(mypresschar);

// 在這里根據自己的情況修改
  if mypresschar<>'' then  form1.Memo1.Lines.Add(mypresschar);
 
如果你的調用主窗體就叫form1,則不用修改,否則把這兩條語句的form1修改為你的調用主窗體的名字。

在 memo編輯框的onChange事件中編寫自己的 鍵盤消息接受主控制過程,其中 字符串mypresschar 返回總鍵值,它跟memo編輯框中顯示值是一樣的 ,例如 g、shift+g、ctrl+2、F9、alt+F9、 等等,其中 字符串shiftstr 返回 控制鍵 shift ctrl alt 的狀態,例如按下ctrl,則  shiftstr=‘ctrl’ ,否則=''。

 
最后不要忘記在程序退出時卸載鍵盤鉤子! 

我的郵件地址:
wanglinyun1@sina.com

王凌云
2010-06-16        

關閉窗口

相關文章

主站蜘蛛池模板: 精品免费视频 | www.午夜| 97在线看 | 伊人av网| 在线观看黄色小视频 | 手机av在线免费观看 | www.日本在线观看 | 中文字幕国产一区 | 亚洲一级在线 | 欧美日韩精品在线观看 | 欧美视频在线观看一区 | 中文字幕一区二区三区在线观看 | 丁香在线视频 | 国产无遮挡 | 激情五月婷婷 | 91白浆 | 少妇搡bbbb搡bbb搡毛茸茸 | 国产日韩精品在线 | 国产小视频在线播放 | 精品一区二区三区免费 | 中文av字幕| 三级av在线 | 欧美一级欧美三级 | 日韩欧美网站 | 91精彩刺激对白 | 黄色成人免费视频 | 超碰人人人 | 四虎视频| 成人在线免费视频观看 | 欧美成人精品欧美一级私黄 | 久久久久国产一区二区三区 | 麻豆精品在线播放 | 成人女同在线观看 | 黄色片观看 | 成人免费精品 | 国产一区久久 | 俺去俺来也在线www色官网 | 91福利片 | 简单av网| 性生活毛片 | 国产女优在线 |