Warum funktioniert UnRegisterHotKey nicht?

[nils14]

Hallo@all

Das Programm soll einen HotKey registrieren das macht es mit:
RegisterHotKey(Handle, 1,0, Ord('A');

Das Programm reagiert auch wenn ich auf a drücke. Wenn ich ein zweite mal auf a drücke soll das Programm nicht mehr ragieren.

UnRegisterHotKey(Handle, Ord('A');

Warum reagiert das Programm immer noch wenn der HotKey eigentlich nicht mehr existieren soll?

Ich wäre für Antworten sehr dankbar.

Nils

[Chewie]

Schau dir doch mal die Referenz zu UnregisterHotKey an. Dort wirst du sehen, dass der zweite Parameter nicht den Keycode des Hotkeys angibt, sondern die ID, das ist der zweite Parameter von RegisterHotkey.

[nils14]

Hallo

Ich habe das auch schon anders mit dem ID Parameter gemacht aber dann kommt die Meldung: Zu viele Parameter.

Wie könnte man das denn dan machen mit UnRegisterHotKey hast du ein Beispiel?

Nils

[Chewie]

Ganz einfach. Dein Aufruf von RegisterHotKey ist schon richtig, und UnregisterKotkey muss dann so aussehen:
UnregisterHotkey(Handle, 1); Das Tastenkürzel brauchst du dot nicht anzugeben.

Noch ein kleiner Tipp: Benutze als Identifier nicht 1, die ist so naheliegend, dass sie mit hoher Wahrscheinlichkeit schon genutzt sein könnte. Benutz lieber ein globales Atom:

Delphi-Quellcode:

var
  AtomId: TAtom;
begin
  AtomID := GlobalAddAtom('Irgendeiner eindeutiger String');
  RegisterHotkey(Handle, AtomID, 0, Ord('A'));
  //...
  UnregisterHotkey(Handle, AtomID);
  GlobalDeleteAtom(AtomID);
end;