[Webinar] Streamline your web hosting managementRegister Today

x
?
Solved

Get defualt path of wave file

Posted on 2000-03-01
3
Medium Priority
?
183 Views
Last Modified: 2010-04-04
Hi,
I want defult path of wave file such like wave on error in windows beep.wav
and in other Pc or OS xx.wav i want the defult path to send it to SndPalySound(defult path,1)

Abdelghani
0
Comment
Question by:ghuna388
3 Comments
 

Expert Comment

by:kangxy
ID: 2572319
Why not use MessageBeep function :)
The MessageBeep function plays a waveform sound. The waveform sound for each sound type is identified by an entry in the [sounds] section of the registry.

BOOL MessageBeep(

    UINT uType       // sound type  
   );

Remarks

After queuing the sound, the MessageBeep function returns control to the calling function and plays the sound asynchronously.
If it cannot play the specified alert sound, MessageBeep attempts to play the system default sound. If it cannot play the system default sound, the function produces a standard beep sound through the computer speaker.
The user can disable the warning beep by using the Control Panel Sound application.
0
 
LVL 13

Expert Comment

by:Epsylon
ID: 2572788
Use Delphi's Beep procedure...
0
 
LVL 17

Accepted Solution

by:
inthe earned 80 total points
ID: 2573678
Hello
these sounds are already defined in mmsystem.pas so to use them just add mmsystem to uses section and use playsound functions:

  PlaySound(pChar('SYSTEMDEFAULT'),0,SND_SYNC);

PlaySound(pChar('SYSTEMSTART'),0,SND_SYNC);

  PlaySound(pChar('SYSTEMEXIT'),0,SND_SYNC);

  PlaySound(pChar('SYSTEMHAND'),0,SND_SYNC);

  PlaySound(pChar('SYSTEMASTERISK'),0,SND_SYNC);

  PlaySound(pChar('SYSTEMQUESTION'),0,SND_SYNC);

  PlaySound(pChar('SYSTEMEXCLAMATION'),0,SND_SYNC);

  PlaySound(pChar('SYSTEMWELCOME'),0,SND_SYNC);


Regards Barry
0

Featured Post

[Webinar] Improve your customer journey

A positive customer journey is important in attracting and retaining business. To improve this experience, you can use Google Maps APIs to increase checkout conversions, boost user engagement, and optimize order fulfillment. Learn how in this webinar presented by Dito.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

A lot of questions regard threads in Delphi.   One of the more specific questions is how to show progress of the thread.   Updating a progressbar from inside a thread is a mistake. A solution to this would be to send a synchronized message to the…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
How can you see what you are working on when you want to see it while you to save a copy? Add a "Save As" icon to the Quick Access Toolbar, or QAT. That way, when you save a copy of a query, form, report, or other object you are modifying, you…
This video tutorial shows you the steps to go through to set up what I believe to be the best email app on the android platform to read Exchange mail.  Get the app on your phone: The first step is to make sure you have the Samsung Email app on your …
Suggested Courses

590 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question