Ресурс из видео файлов

[SlavaSH]

Delphi XE3.
Ищу пример для извлечения и просмотра видео из ресурсов. Весь гугл перерыл, одна хрень попадается. В основном примеры для картинок или аудио, а видосы как будто никто не добавляет. А те примеры, что находил не работают.

[Человек_Борща]

что ещё за ресурсы видео-файлах?

[SlavaSH]

Файл-ресурс, в котором содержится видео, что непонятного?

[Streletz]

Воспроизведение видео из файла ресурсов (exe, памяти) средствами DirectShow.

Файл-ресурс, в котором содержится видео, что непонятного?

Ваша тема почему-то называется

Ресурс из видео файлов

, а не наоборот.

[SlavaSH]

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

Воспроизведение видео из файла ресурсов (exe, памяти) средствами DirectShow.

эту ссылку я находил, но в итоге зашел в тупик!
там куча ошибок, которые я понятия не имею как устранить!

[raxp]

Это потому что xaramamburu слишком увлекается DSPack-ом и его классами вместо непосредственного использования хидеров DirectShow.

Удалите из uses данного проекта модуль BaseClass и в процедуре выбора видео из ресурса по двойному клику замените строку:

TBCMediaType(pmt).InitMediaType;

на:

  ZeroMemory(pmt, sizeof(pmt));
  pmt.lSampleSize := 1;
  pmt.bFixedSizeSamples := True;

Все компилируется и работает.

[SlavaSH]

теперь появляется ошибка

[dcc32 Error] E2161 Error: RLINK32: Out of memory!

а как сделать чтобы файл ресурсов не добавлялся в Exe-шник, а так и оставался отдельно от него?

[XE5]

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

а как сделать чтобы файл ресурсов не добавлялся в Exe-шник, а так и оставался отдельно от него?

А какой смысл тогда от ресурса?

[raxp]

У меня нормально компилируется и работает в TurboDelphi over BDS-2006, Delphi 2010, Delphi XE5.

а так и оставался отдельно от него?

а смысл тогда? Храните видео отдельно как оно есть.

[SlavaSH]

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

а смысл тогда? Храните видео отдельно как оно есть.

смысл, чтоб никто не мог посмотреть видео отдельно, только чтобы при использовании программы, и размер видео будет приличным