Wie Hotkey aus THotkey an Anwendung senden?

[Mazel]

Guten Morgen,

@Bernie68:
Leider scheint es die sdnkey32 Unit nicht bei mir zu geben. Ich muss sagen das ich den Inhalt der Unit hier nicht richtig verstehe, ist ziemlich komplex.

Ich habe jetzt folgenden Code mir zusammengebaut aber leider funktiniert dies auch nicht.

Delphi-Quellcode:

ShortCutToKey(HotKey1.Hotkey, Key, Shift);
If ssCtrl in Shift then Modifiers := MOD_CONTROL;
If ssAlt in Shift then Modifiers := Modifiers or MOD_ALT;
If ssShift in Shift then Modifiers := Modifiers or MOD_SHIFT;
SendMessage(Wnd, WM_KEYDOWN, Hi(Modifiers), Key);

Weis jemand warum das nicht funktioniert? Ich habe es bei vielen Programmen versucht aber leider ohne Erfolg.

Gruß
Mazel