Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.25;
Скачать: CL | DM;

Вниз

*.WAV наткнулась на один пример, но он у меня не работает   Найти похожие ветки 

 
Оля   (2002-11-15 17:08) [0]

ВОПРОС:
Можно ли сделать так, чтобы в исполняемом файле программы находился какой-нибудь звук в формате .wav, и можно было бы проиграть этот звук?

ОТВЕТ:
В файл MyWave.rc пишешь:

MyWave RCDATA LOADONCALL MyWave.wav

brcc32.exe MyWave.rc, получаешь MyWave.res.

В своей программе пишешь:

{$R MyWave.res}

Все!

Предупреждая следующий твой вопрос "а как прочитать wave-файл из
исполняемого файла?"

procedure RetrieveMyWave;
var
hResource: THandle;
pData: Pointer;
begin
hResource:=LoadResource( hInstance, FindResource(hInstance, "MyWave", RT_RCDATA));
try
pData := LockResource(hResource);

if pData = nil then
raise Exception.Create("Cannot read MyWave");

// Здесь pData указывает на MyWave
// Теперь можно, например, проиграть его (Win32):
PlaySound(pData, 0, SND_MEMORY);
finally
FreeResource(hResource);
end;
end;
=================
Я сделала все как сдесь сказано, от себя ничего не добовляла,
а при компиляции выскакивает такая штука:
[Error] nay.pas(793): Undeclared identifier: "PlaySound"
[Error] nay.pas(793): Undeclared identifier: "SND_MEMORY"
Что делать? хелп ми плиз энибоди


 
Игорь Шевченко ©   (2002-11-15 17:12) [1]

uses
MMSystem;


 
Оля   (2002-11-15 17:29) [2]

все ок
спасибо



Страницы: 1 вся ветка

Текущий архив: 2002.11.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
8-82880
ACR
2002-08-03 23:45
2002.11.25
Streming Video


1-82751
Lina
2002-11-15 10:45
2002.11.25
Может у кого есть доки по созданию ActiveX EXE серверов ?


14-82913
Shadow
2002-11-06 22:31
2002.11.25
Детская преступность


6-82899
lumazen
2002-09-30 16:05
2002.11.25
Как маскироваться от IDS (Intrusion Detection System)


3-82657
Dbrf
2002-11-06 14:14
2002.11.25
Фильтрация данных