Registriert seit: 4. Sep 2004
1.465 Beiträge
Delphi 10.4 Sydney
|
Sonderzeichen an die Tastatur senden?
10. Sep 2012, 03: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?
|
|
Zitat
|