Einzelnen Beitrag anzeigen

PeterPanino

Registriert seit: 4. Sep 2004
1.451 Beiträge
 
Delphi 10.4 Sydney
 
#1

Sonderzeichen an die Tastatur senden?

  Alt 10. Sep 2012, 02:59
Hallo! Ich möchte ein Sonderzeichen an die Tastatur senden, und zwar das Zeichen "Registrierte Marke". Wenn ich das per "Alt+0174" manuell auf dem Tastatur-Ziffernblock eingebe, wird es richtig ausgegeben: ®

Wenn ich das aber per Code mache, funktioniert es nicht:
Delphi-Quellcode:
keybd_event(VK_MENU, 0, 0, 0); // press (Alt-Taste)

keybd_event(VK_NUMPAD0, 0, 0, 0); // drücken
keybd_event(VK_NUMPAD0, 0, KEYEVENTF_KEYUP, 0); // loslassen

keybd_event(VK_NUMPAD1, 0, 0, 0); // drücken
keybd_event(VK_NUMPAD1, 0, KEYEVENTF_KEYUP, 0); // loslassen

keybd_event(VK_NUMPAD7, 0, 0, 0); // drücken
keybd_event(VK_NUMPAD7, 0, KEYEVENTF_KEYUP, 0); // loslassen

keybd_event(VK_NUMPAD4, 0, 0, 0); // drücken
keybd_event(VK_NUMPAD4, 0, KEYEVENTF_KEYUP, 0); // loslassen

keybd_event(VK_MENU, 0, KEYEVENTF_KEYUP, 0); // release (Alt-Taste)
Wer weiß, was hier falsch läuft?
  Mit Zitat antworten Zitat