Звуковые файлы

[В_И_К_Т_О_Р]

Можно ли в Delphi звуковой файл "срастить" с exe, как делается с файлами рисунков?
Спасибо.

[AlDelta]

http://programmersforum.ru/showthrea...4242#post64242
Смотри пост mihali4'a (#6).

[В_И_К_Т_О_Р]

Спасибо большое! Все получилось.
Командой "PlaySound('SND1', 0, SND_RESOURCE or SND_ASYNC);"
запускается прекрасно, но теперь как остановить, если не доиграл
не знаю. Какой командой?
Спасибо.

[SERG1980]

Сообщение от В_И_К_Т_О_Р

"PlaySound('SND1', 0, SND_RESOURCE or SND_ASYNC);"
.

PlaySound(' ', 0, SND_RESOURCE or SND_ASYNC);

[В_И_К_Т_О_Р]

"PlaySound(' ', 0, SND_RESOURCE or SND_ASYNC);"
Почему то не получается, играет ,пока не закончится

[mihali4]

Сообщение от В_И_К_Т_О_Р

"PlaySound(' ', 0, SND_RESOURCE or SND_ASYNC);"
Почему то не получается, играет ,пока не закончится

А в хэлпе самостоятельно посмотреть слабо?

The PlaySound function plays a sound specified by the given filename, resource, or system event. (A system event may be associated with a sound in the registry or in the WIN.INI file.)

BOOL PlaySound(

LPCSTR pszSound,
HMODULE hmod,
DWORD fdwSound
);

Parameters

pszSound

A string that specifies the sound to play. If this parameter is NULL, any currently playing waveform sound is stopped. To stop a non-waveform sound, specify SND_PURGE in the fdwSound parameter.