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

Вниз

Проигрывание MediaPlayer видеоролика из ресурса   Найти похожие ветки 

 
Alex_06   (2006-10-23 10:27) [0]

Уважаемые Мастера! Решил видеоролик вставить в файл ресурса и, затем, поместить в свой EXE-шник. Создал файл name.rc со строкой  CHEAK WMV "Rol.wmv", затем скомпилировал с помощью brcc32.exe. Подключил полученный res-файл к программе, но как теперь загрузить ролик в MediaPlayer? Подскажите. Спасибо.


 
AbrosimovA ©   (2006-10-24 11:53) [1]

function ExtractResource(const ResName,FileName: string; ResType: PChar): boolean;
var
ResStream : TResourceStream;
begin
ResStream := nil;
try
 ResStream := TResourceStream.Create(HInstance, ResName, ResType);
 ResStream.SaveToFile(FileName);
finally
 ResStream.Free;
end;
end;

ExtractResource("CHEAK","Rol.wmv","WMV");
With MediaPlayer1 do begin
 Filename := "Rol.wmv";
 Open;
 Play;
end;


 
WondeRu at work   (2006-10-26 11:12) [2]

Глянь вот этот компонент http://www.rawos.com/sw/downloads/wplayer.zip. Там есть возможность проигрывания из ресурса


 
Alex_06   (2006-10-26 15:36) [3]

WondeRu at work
http://www.rawos.com/sw/downloads/wplayer.zip - Данная ссылка не существует.


 
WondeRu at work   (2006-10-31 12:37) [4]

Блин, а я как качал???

лан,выложил сюды:
wonderu.com/download/WAVEPLAY.ZIP
wonderu.com/download/wplayer.zip



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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
15-1182492854
kert
2007-06-22 10:14
2007.07.22
Хочу установить


2-1183048916
Yurish
2007-06-28 20:41
2007.07.22
TClientSocket TServerSocket таковых в Делфи 7 нет?


2-1182882228
Chaval'
2007-06-26 22:23
2007.07.22
ListView


15-1182509815
Ega23
2007-06-22 14:56
2007.07.22
Идиотский вопрос


2-1183224027
Lavrenty
2007-06-30 21:20
2007.07.22
Корректность кода