Kolejny raz podkładamy pod timer taki kod:
Windows.Beep(Random(2000) + 100, 20);

Procedura  powoduje wygenerowanie dźwięku o określonej częstotliwości (podanej w pierwszym parametrze) trwającego określoną liczbę milisekund (drugi parametr) przez wewnętrzny głośnik kompa. Efekt jest niezły i dosyć wkurzający...

Autor: fatalbomb

Kategoria: Delphi » Żarty w Delphi

1 komentarz

Avatar: TomRiddle
Napisany 2011-03-27 13:03 przez TomRiddle

To nie przez wew. głośniczek. Jak ja wyłącze te swoje normalne głośniki to przestaje pikać.

4programmers.net