delphi - how to replace Windows.Beep with modern beep sound -


How To Change Windows Keep up with the modern beep sound that comes from speakers with adjusted volume?

Try this one

  uses MMSystem; Process TForm1.Button1Click (Sender: Tubbed); Start sndPlaySound ('C: \ Windows \ Media \ sound.wav', SND_NODEFAULT or SND_ASYNC or SND_LOOP); End; Process TForm1.Button2lick (Sender: Tubbed); Start sndPlaySound (zero, 0); // prevents the end of the sound;  

Comments

Popular posts from this blog

windows - Heroku throws SQLITE3 Read only exception -

lex - Building a lexical Analyzer in Java -

python - rename keys in a dictionary -