Тема: как сделать звуки в программе
Показать сообщение отдельно
  #2  
Старый 24.04.2014, 23:25
Аватар для angvelem
angvelem angvelem вне форума
.
  
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию
Добавить WAV-файл(ы) в ресурсный файл.
Код:
PlaySound(PChar(Имя в ресурсном файле), hInstance, SND_RESOURCE or SND_MEMORY or SND_ASYNC);
Не забыть подключить MMSystem в uses.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.