Как да напишете свой собствен MediaPlayer

Искам да напиша свой собствен MediaPlayer, дайте ми връзка, където да получа описание на този процес.

По принцип всичко е много просто и не съществува нищо конкретно за процеса на писане от литературата. В книгите има само анализ на прости медийни плейъри, но всички те се основават на стандартните възможности на TMediaPlayer. Изводът е, че трябва да намерите компонента, на който ще се основава медийният плейър. Освен това вземате всеки медиен плейър, дори същия стандартен, гледате какво има и пишете същото. Не вярвам, че всичко това ще създаде трудности. Трудностите обикновено се причиняват от някои индивидуални реализации. Разбира се, винаги можете да зададете по-конкретни въпроси във форума - те по някакъв начин получават по-добър отговор.

Михей,
Кой компонент бихте препоръчали?

Бих посъветвал да не се занимаваме с готов компонент, но да напишем плейър в DirectShow, това е по-лесно от този „компонент“, даден ни от Били. Ако използвате всякакви готови компоненти там, това ще се окаже негъвкаво, а не това, което искате.

Написах плейъра си (можете да го изтеглите от http://nailman.narod.ru) чисто на DirectShow.

Между другото, за начало, ето пример за модул за изобразяване на филм във всеки прозорец:

единица UTVideoPlayer;
интерфейс
Използва
Windows,
DirectShow,
ActiveX;

ТИП
TVideoRenderer = КЛАС
Частен
FGraph: IGraphBuilder;
FMediaControl: IMediaControl;
FVidWin: IVideoWindow;
FEvent: IMediaEvent;
Публично
Създаване на конструктор;
Destructor Destroy; заместване;
Възпроизвеждане на процедурата (const fn: низ; wnd: HWND);
КРАЙ;

Функция PlayVideo (fn: String; Wnd: HWND): Boolean;
вар
v: TVideoRenderer;
започнете
резултат: = вярно;
опитвам
v: = TVideoRenderer.Create;
опитвам
v.Play (fn, wnd);

---