We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
[X]
Welcome to Experts Exchange
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
- Help others & share knowledge
- Earn cash & points
- Learn & ask questions
3 Comments
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.
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.
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('SYSTEMDEF
PlaySound(pChar('SYSTEMSTA
PlaySound(pChar('SYSTEMEXI
PlaySound(pChar('SYSTEMHAN
PlaySound(pChar('SYSTEMAST
PlaySound(pChar('SYSTEMQUE
PlaySound(pChar('SYSTEMEXC
PlaySound(pChar('SYSTEMWEL
Regards Barry
these sounds are already defined in mmsystem.pas so to use them just add mmsystem to uses section and use playsound functions:
PlaySound(pChar('SYSTEMDEF
PlaySound(pChar('SYSTEMSTA
PlaySound(pChar('SYSTEMEXI
PlaySound(pChar('SYSTEMHAN
PlaySound(pChar('SYSTEMAST
PlaySound(pChar('SYSTEMQUE
PlaySound(pChar('SYSTEMEXC
PlaySound(pChar('SYSTEMWEL
Regards Barry
Featured Post
Question has a verified solution.
If you are experiencing a similar issue, please ask a related question
Objective:
- This article will help user in how to convert their numeric value become words.
How to use
1. You can copy this code in your Unit as function
2. than you can perform your function by type this code
The Code
(CODE)
The Im…
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…
In this brief tutorial Pawel from AdRem Software explains how you can quickly find out which services are running on your network, or what are the IP addresses of servers responsible for each service. Software used is freeware NetCrunch Tools (https…
Do you want to know how to make a graph with Microsoft Access? First, create a query with the data for the chart. Then make a blank form and add a chart control. This video also shows how to change what data is displayed on the graph as well as form…
Suggested Courses
Course of the Month6 days, 2 hours left to enroll
688 members asked questions and received personalized solutions in the past 7 days.
Join the community of 500,000 technology professionals and ask your questions.