Tastaursimulation + Windows.pas

[Harry M.]

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 = 'k' then 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);