Einzelnen Beitrag anzeigen

Benutzerbild von Harry M.
Harry M.

Registriert seit: 29. Okt 2004
Ort: Halle
462 Beiträge
 
#5

Re: Tastaursimulation + Windows.pas

  Alt 21. Apr 2005, 14:26
Delphi-Quellcode:
  TEMPSTR := 'k';
  keybd_event(Ord(TEMPSTR[1]), MapVirtualKey(Ord(TEMPSTR[1]), 0), 0, 0);
  keybd_event(Ord(TEMPSTR[1]), MapVirtualKey(Ord(TEMPSTR[1]), 0), KEYEVENTF_KEYUP, 0);
oder eben wie schon oben gepostet:
PostKeyEx32(Ord(TEMPSTR[1]), [], FALSE); so wie du es gepostest hast geht es ja auch aber aber nur wenn ich es mi button habe und mit einer direkten letter angabe zb 'a'. ich brauche das so, wie ich es dargestellt habe. ich habe auch schon über die abfrage:

if TEMPSTR = 'kthen keybd_event(Ord('k'), MapVirtualKey(Ord('k'), 0), 0, 0); es versucht. nix da kommt ein '+' ob du es glaubst oder nicht. ich kann dir ja mal den code via pn zustellen. ist auch nicht viel, weil ich dieses problem "ausserhalb der hauptanwendung" behandle.

ich bin mir zwar noch nicht ganz sicher aber wenn ich TEMPSTR als ascii-code behandele geht... aber ich bin mir noch nicht ganz sicher

Delphi-Quellcode:
  TASTE := StrToInt(TEMPSTR); //in TEMPSTR steht jetzt zb 65 für 'A'
  keybd_event(TASTE, MapVirtualKey(TASTE, 0), 0, 0);
  keybd_event(TASTE, MapVirtualKey(TASTE, 0), KEYEVENTF_KEYUP, 0);
Harry
Gruß Harry
www.H-Soft.info
  Mit Zitat antworten Zitat