Delphi中注册全局热键的话,可能有第三方实现,我也没有去找,因为全局热键这个操作不复杂,就调用几个API就可以了。也比较简单,也没有进行封装,我做了一个测试的功能,就是按下快捷键后,弹出一个界面。完整的代码如下,以备他人或以后参考。

unit unitMain;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, unitCSHotkey, ExtCtrls, ...... 

查看完整文章