![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
подключения ресурсного файла [D7, WinXP]
Mister © (2007-12-31 09:43:00)Подскажите пожалуйста как задействовать содержимое ресурсного файла в нем содержится звук.
проблема такая нужно чтоб при нажатии кнопки TMediaPlayer проигрывал звук из ресурсного файла
ага (2008-01-03 12:26:00) [1]
if 0 <> FindResource(hInstance, 'MYWAVE', 'Wave')
then PlaySound('mywave', hInstance, SND_RESOURCE or SND_ASYNC);
Вместо hInstance можно использовать значения от getModuleHandle or LoadLibrary
savyhinst (2008-01-01 12:37:00) [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;
Mister (2007-12-31 09:49:00) [3]прошу прощения не туда отправил если можно перевести в раздел начинающим а если нет то уж объясните пожалуйста.