Flash Point
Tu kilka słów wyjaśnienia: program ma za zadanie spowodować migotanie wszystkich diod na klawiaturze. Dokonujemy tego w ten sposób:
Randomize; if Random(3) = 0 then begin keybd_event(VK_NUMLOCK, 0, 0, 0); keybd_event(VK_NUMLOCK, 0, KEYEVENTF_KEYUP, 0); end; if Random(3) = 0 then begin keybd_event(VK_CAPITAL, 0, 0, 0); keybd_event(VK_CAPITAL, 0, KEYEVENTF_KEYUP, 0); end; if Random(3) = 0 then begin keybd_event (VK_SCROLL, 0, 0, 0); keybd_event (VK_SCROLL, 0, KEYEVENTF_KEYUP, 0); end;
Pierwszy parametr procedury keybd_event to kod klawisza. Zamiast podanych można też użyć innych, np. VK_F2, VK_INSERT, itd.
Autor: fatalbomb
