如何在Windows中挂钩全局快捷方式？

I remember using a program, some years back, that allowed me to fine-tune my monitor's settings with custom gamma ramps and other adjustments. It had the ability to create different screen-settings profiles for different uses, and setup global hotkey shortcuts to activate them without switching out of the program you're in.

我记得几年前使用的程序允许我使用自定义伽马斜坡和其他调整来微调我的显示器设置。它能够为不同的用途创建不同的屏幕设置配置文件,并设置全局热键快捷键以激活它们,而无需切换出您所在的程序。

My question is, how do you set up the hook for that? I'm sick of WINDOWS-D minimizing everything when I only want access to the desktop in one screen and I want to keep working in the other one. (I have 2 monitors for a reason!) So I figure it shouldn't be that difficult to hack up a little Delphi app that will minimize everything on one monitor. The only problem is hooking it to a hotkey. Does anyone know what the API is for this?

我的问题是,你如何为此设置钩子?当我只想在一个屏幕*问桌面并且我想继续在另一个屏幕上工作时,我厌倦了WINDOWS-D最小化所有内容。 (我有2个显示器是有原因的!)所以我认为应该不会那么难以破解一个小的Delphi应用程序,它将最小化一台显示器上的所有内容。唯一的问题是将它挂钩到热键。有谁知道这是什么API?

1 个解决方案

#1

http://www.swissdelphicenter.ch/torry/showcode.php?id=147

Basically there are three steps:

基本上有三个步骤:

Register

// Register Hotkey Win + A
id1 := GlobalAddAtom('Hotkey1');
RegisterHotKey(Handle, id1, MOD_WIN, VK_A);

Handle

procedure WMHotKey(var Msg: TWMHotKey); message WM_HOTKEY;

{ .... }

// Trap Hotkey Messages
procedure TForm1.WMHotKey(var Msg: TWMHotKey);
begin
  if Msg.HotKey = id1 then
    ShowMessage('Win + A pressed !');

Unregister

UnRegisterHotKey(Handle, id1);
GlobalDeleteAtom(id1);

#1