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

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

Воспроизведение видео [D7, WinXP]


Scorp123 ©   (2006-02-11 15:07:00) 

Мне необходимо на равне со стандартными форматами видео mpg, mpeg, mpe, m1v, mpv
и т.д. воспроизводить в своей пограмме Dvd формат Vob. Стандартный MediaPlayer на
отрез отказывается понимать этот тип файла. Возможно кто то посоветует какой- то
аналог MediaPlayer?


NailMan   (2006-02-13 21:14:00) [1]

misha_gr  
А snapshot, юный падаван, детально расписан в DX SDK в файлике .CHM в описании "ISampleGrabber Interface". Там внизу есть ссылочка "Using the Sample Grabber"

Учите матчасть!

---
P.L.U.R. and WBR, NailMan aka 2:5020/3337.13


misha_gr   (2006-02-13 18:25:00) [2]

[5]
А если бы мастера написали как snapshot сделать, было бы совсем чудесно...


scorp123   (2006-02-12 14:19:00) [3]

Отлично! Всё работает просто на ура. Попробовал и исходник и програмку, что из видео в них ни суй, воспроизводит и глазом не маргнёт.


NailMan   (2006-02-12 10:58:00) [4]

Я бы даже сказал больше:
http://nailman.cyborghome.ru/zakroma/sources/nm_play_class.zip

---
P.L.U.R. and WBR, NailMan aka 2:5020/3337.13


Eraser   (2006-02-11 23:47:00) [5]

строку
BasicVideo := MyGraphBuilder as IBasicVideo;
можешь выкинуть...


Eraser   (2006-02-11 23:46:00) [6]


> Scorp123 ©   (11.02.06 15:07)


uses
 DShow, DirectX, ComObj
...
var
 MyGraphBuilder: IGraphBuilder;
 MyMediaControl: IMediaControl;
 VideoWindow: IVideoWindow;
...
procedure TfmMain.Button1Click(Sender: TObject);
begin
 MyGraphBuilder := CreateComObject(CLSID_FilterGraph) as IGraphBuilder;
 MyGraphBuilder.RenderFile('1.avi',nil); // укажи имя файла
 MyMediaControl := MyGraphBuilder as IMediaControl;
 VideoWindow := MyGraphBuilder as IVideoWindow;
 BasicVideo := MyGraphBuilder as IBasicVideo;
 MyMediaControl.Run;
end;

вот тебе "плеер" на чистом DirectDraw :-) даже DVD читает!


NailMan   (2006-02-11 20:41:00) [7]

Однажды когда я перешел полностью на свой видеоплеер, и не было поддержки DVD, мой батя попробовал открыть моим плеером .VOB. И прокатило. Я сам аж удивился. Я обычно пользовал его для всех avi, mpeg etc форматов.

Так что чистый DirectShow и никаких проблем с форматами. Точно также он и воспроизводит mov(если k-lite codec pak стоит). прадва расширенной поддержки этих форматов я не делал как для avi.

---
P.L.U.R. and WBR, NailMan aka 2:5020/3337.13


misha_gr   (2006-02-11 20:21:00) [8]

например DsPack :

http://progdigy.com/modules.php?name=DSPack
хотя он у меня вызвал определенные проблемы.

Или попытайся импортировать системный ocx компонент ActiveMovie.

еще есть mmtools, но они коммерческие, ломать надо.

В общем, советую прислушаться к [1].


Scorp123   (2006-02-11 18:23:00) [9]

Благодарствую за помощ.


NailMan   (2006-02-11 16:17:00) [10]

пользуй DirectShow напрямую и будет тебе счастье!

---
P.L.U.R. and WBR, NailMan aka 2:5020/3337.13


Наверх

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