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

Вниз

подключения ресурсного файла   Найти похожие ветки 

 
Mister   (2007-12-31 09:43) [0]

Подскажите пожалуйста как задействовать содержимое ресурсного файла в нем содержится звук.
проблема такая нужно чтоб при нажатии кнопки TMediaPlayer проигрывал звук из ресурсного файла


 
Mister   (2007-12-31 09:49) [1]

прошу прощения не туда отправил если можно перевести в раздел начинающим а если нет то  уж объясните пожалуйста.


 
savyhinst ©   (2008-01-01 12:37) [2]


> задействовать содержимое ресурсного файла в нем содержится
> звук


...
{$R res.res}
...
var WaveHandle  : THandle;
      WavePointer : pointer;
...
WaveHandle  := FindResource(hInstance,"MY_SOUND",RT_RCDATA);
if WaveHandle<>0 then begin
 WaveHandle:= LoadResource(hInstance,WaveHandle);
 if WaveHandle<>0 then begin
 WavePointer := LockResource(WaveHandle);
 //тут с этим что-то творится
 UnlockResource(WaveHandle);
 FreeResource(WaveHandle);
 end;
end;


 
ага   (2008-01-03 12:26) [3]

if 0 <> FindResource(hInstance, "MYWAVE", "Wave")
 then  PlaySound("mywave", hInstance, SND_RESOURCE or SND_ASYNC);

Вместо hInstance можно использовать значения от getModuleHandle or LoadLibrary



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

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

Наверх




Память: 0.47 MB
Время: 0.011 c
2-1199193184
Lamer666
2008-01-01 16:13
2008.01.27
Ошибка при после вызова формы из DLL


8-1169121333
Tehnik
2007-01-18 14:55
2008.01.27
открытие для просмотра *.tga файлы


15-1197963583
Slider007
2007-12-18 10:39
2008.01.27
С днем рождения ! 18 декабря 2007 вторник


2-1198772246
Ega
2007-12-27 19:17
2008.01.27
Как прочесть текстовый файл в widestring?


2-1198484538
Artem
2007-12-24 11:22
2008.01.27
TAnimate, gif не работает в CLX-приложениях