Monday, March 13, 2006

Klávesové zkratky

V dalším tipu si ukážeme, jak snadno použít v naší aplikaci globální systémové klávesové zkratky, tj. klávesové zkratky fungující v celém systému, i pokud je aktivní jiná aplikace než naše. Nejprve se "hotkey" zaregistruje v systému a poté budeme již jen zachytávat došlé zprávy o stisknutí dané klávesové kombinace a příslušně reagovat. V našem příkladu si ukážeme pro představu například klávesové zkratky CTRL+A a CTRL+B, po jejichž stisknutí ze zobrazí jednoduché upozornění.
Nejprve do sekce private přidáme:
private
zkratka1, zkratka2: Integer;
procedure WMHotKey(var Msg : TWMHotKey); message WM_HOTKEY;
A dále přidáme procedury na zpracování zpráv a registraci (a zrušení registrace po ukončení aplikace) horkých kláves: