Einzelnen Beitrag anzeigen

Cyberstorm

Registriert seit: 23. Okt 2003
159 Beiträge
 
Delphi 2010 Architect
 
#3

Re: Text mittels Keybd_Event markieren (VK_Shift)

  Alt 21. Aug 2007, 20:10
bräuchte hier doch nochmal hilfe:

sobald ich RSHIFT simuliere und dazwischen noch die VK_Left's bringt das KEYUP nichts mehr und rshift "verklemmt" sich bis ichs auf der tastatur drücke.

völlig egal, ob ich danach noch 20 keyup events sende oder keydown/up.
wenn ich zwischen down und up jedoch andere tasten (z.b. "a") simuliere passiert das nicht.

ist das mit dem code bei euch auch so? (einfach mal in nen 5sek timer hauen und nem memo oder so testen, ob sich rshift verklemmt (an den anfang vom memo klicken z.b.)

Delphi-Quellcode:
  KeyBd_Event(VK_RSHIFT, 0, 0, 0);
   for i:=1 to 5 do
    begin
      KeyBd_Event(VK_LEFT, 0, 0, 0);
      KeyBd_Event(VK_LEFT, 0, KEYEVENTF_KEYUP, 0);
    end;
  KeyBd_Event(VK_RSHIFT, 0, KEYEVENTF_KEYUP, 0);
end;
danke schonmal
  Mit Zitat antworten Zitat