MediaPlayer Display

[StartMis]

Помогите. создал присвоил Form1.MediaPlayer1.Display:=Form1.P anel4;
на Panel4 кинул Image при проигрывании видео Image пропадает почему и как это устранить.

[KORN]

ну так поверх него идет видео... ты при воспроизведении попробуй для image сделать visible:=false; а при остановки true

[StartMis]

меня интересует, как можно поверх идущего видео показать image

[BOBAH13]

Сообщение от StartMis

меня интересует, как можно поверх идущего видео показать image

Блин я начинаю нервничать. Что уже так сложно "разуть" глаза и посмотреть тему рядом стояшую ? http://www.programmersforum.ru/showthread.php?t=37353

[StartMis]

тему рядом стояшую

BOBAH13 по моемому нечего общего.

[BOBAH13]

И так... что же тут не общего
1. Проиграть видео, не вам и не тому человеку ненадо ?
2. Перехватить кадр ? Тоже ненадо
3. На этот кадр нанести изображение какое хотите ? ненадо ?
4. Вывести каждый кадр с наложенным изображением куда угодно. Ненадо ?

Ну тогда, видимо я не так понял вопрос, или конечно опять я понимаю, зачем думать, напрягатся, если можно пихнуть компонент и все ура
Вот именно, по вашему ничего общего. Без обид.

[StartMis]

3. На этот кадр нанести изображение какое хотите ?

Да это и надо но вданной теме я этого не вижу

[BOBAH13]

Сообщение от StartMis

Да это и надо но вданной теме я этого не вижу

Потому что вообще видимо незнаите о чем она, и делаите выводы о которых ничего незнаите

На счет SampleGrabber - будут вопросы, отвечу.

Добавление фильтра перехвата кадра

FillChar(MediaType, SizeOf(MediaType), 0);
MediaType.majortype := MEDIATYPE_Video;
MediaType.subtype := MEDIASUBTYPE_RGB24;
SampleGrabber.SetMediaType(MediaTyp e);
SampleGrabber.SetBufferSamples(True );
SampleGrabber.SetOneShot(False);
SampleGrabber.SetCallback(Self, 0); // ставим обработку для текущего (self) класса
GraphBuilder.AddFilter(FilterSample Grabber, 'Sample Grabber');

TYourClass = class(ISampleGrabberCB) // ставим наследование интерфейса
...
private
    function SampleCB(SampleTime: Double; pSample: IMediaSample): HResult; stdcall;
    function BufferCB(SampleTime: Double; pBuffer: PByte; BufferLen: longint): HResult; stdcall;

pSample - хранит данные текущего кадра, размер и указатель на битовые данные.

Пожалуйста, больше не надо делать выводы, если вы не видите решения вашей задачи.

Спасибо.