(Delphi) Jak symulować wciśnięcie klawisza CTRL + V lub CTRL + C w całym systemie Windows: Różnice pomiędzy wersjami

Z Podręcznik Administratora by OPZ SGU
Przejdź do nawigacji Przejdź do wyszukiwania
(Utworzył nową stronę „Poniższy kod symuluje przyciśnięcie klawisza Ctrl+ v oraz Ctrl+c Wykonanie tej funkcji skopiuje zaznaczoną treść do schowka systemowego lub wklei jego zawartoś…”)
 
m (Zastępowanie tekstu - "<source lang="delphi">" na "<pre>")
 
(Nie pokazano 2 wersji utworzonych przez 2 użytkowników)
Linia 5: Linia 5:
Funkcja ta zadziała nawet wtedy gdy nasza aplikacja będzie ukryta!
Funkcja ta zadziała nawet wtedy gdy nasza aplikacja będzie ukryta!


<source lang="delphi">
<pre>


//Ctrl+C
//Ctrl+C
Linia 23: Linia 23:
keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), KEYEVENTF_KEYUP, 0)
keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), KEYEVENTF_KEYUP, 0)


</source>
</pre>
 
 
[[Category:Delphi]]

Aktualna wersja na dzień 14:28, 18 lut 2018

Poniższy kod symuluje przyciśnięcie klawisza Ctrl+ v oraz Ctrl+c

Wykonanie tej funkcji skopiuje zaznaczoną treść do schowka systemowego lub wklei jego zawartość.

Funkcja ta zadziała nawet wtedy gdy nasza aplikacja będzie ukryta!


//Ctrl+C

keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), 0, 0);
keybd_event(Ord('C'), MapVirtualKey(Ord('C'), 0), 0, 0);
keybd_event(Ord('C'), MapVirtualKey(Ord('C'), 0), KEYEVENTF_KEYUP, 0);
keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), KEYEVENTF_KEYUP, 0)



//Ctrl+V

keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), 0, 0);
keybd_event(Ord('V'), MapVirtualKey(Ord('V'), 0), 0, 0);
keybd_event(Ord('V'), MapVirtualKey(Ord('V'), 0), KEYEVENTF_KEYUP, 0);
keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), KEYEVENTF_KEYUP, 0)