Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

КАК ДОБАВИТЬ В РЕСУРС MP3 И ПОТОМ ВОСПРОИЗВЕСТИ ЕГО ? [D5, Win95/98]


step[B.M.] ©   (2002-09-19 10:36:00) 

Интересный вопрос, как добавить в ресурс MP3-файл, а потом его воспроизвести?


Poirot   (2002-09-20 17:05:00) [1]

procedure TForm1.ExtractRes(ResType, ResName, ResNewName : String);
var
Res : TResourceStream;
begin
Res := TResourceStream.Create(Hinstance, Resname, RT_VERSION);
Res.SavetoFile(ResNewName);
Res.Free;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
ExtractRes("MP3", "MY", "c:\my.mp3");
end;


Блин прям из факу взято а потом играем в TMediaPlayer....


Blacker77   (2002-09-20 16:29:00) [2]

Кстати да... Проиграть не получается! Если не лень HELP PLS!


step[B.M.]   (2002-09-20 14:28:00) [3]

Smiths (19.09.02 18:02)
Хмм... сори. прикомпилить я его прикомпиливаю :-) , но вот воспроизвести не получается... :-(.
как указать медиа плееру ресурс для проигрывания?????

Poirot ©
поконкретнее, плз.


Poirot   (2002-09-20 09:29:00) [4]

Для поиска на этом сайте!!!
ПУХ!!!


Smiths   (2002-09-19 18:02:00) [5]

Ключевые слова: Brcc, TResourceStream, TMediaPlayer.


Наверх

Титульная страница Поиск, карта сайта Написать письмо