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

Вниз

Мучения с видео :)   Найти похожие ветки 

 
Ray ©   (2006-05-22 20:40) [0]

1.Как узнать, какое в загружаемом .avi разрешение и частота кадров?
2.Как вывести отдельный указанный кадр в виде стоп-кадра?
3.Как его сохранить в Image?


 
programania ©   (2006-05-22 20:52) [1]

Вот пример из книги "win32 Api в Delphi" для Delphi7 8кб
В нем определяется число кадров в фильме его длительность и
сохраняется в bmp кадр соответствующий trackBar
http://programania.com/avi2bmp.zip


 
Desdechado ©   (2006-05-22 21:10) [2]

> Как вывести отдельный указанный кадр в виде стоп-кадра?
Многие кодеки хранят не кадр целиком, а его отличие от какого-то базового кадра. Причем этот базовый определяется при кодировании исходя из динамичности сцены, но не реже, чем некоторое число. Поэтому получить небазовый кадр можно только путем просчета всех кадров до нужного начиная с базового.
А вообще многое от кодека зависит.

> Как его сохранить в Image?
Image ничего не кохраняет, он показывает.


 
Ray ©   (2006-05-23 21:59) [3]

Ответ:

Poz:=CurPoz.Frames+Trunc(fps*(CurPoz.Seconds+60*CurPoz.Minutes+360*CurPoz.Hours));
With MediaPlayer do
 begin
  StartPos:=Poz;
  EndPos:=Poz+1;
  Play;
 end;

И всего-то :)


 
Ray ©   (2006-05-23 22:06) [4]

Возвращаюсь к п.3
Вывожу видео на панель:

 With MediaPlayer do
     begin
      FileName:=BackgroundAVIFileName;
      TimeFormat:= tfFrames;
      Display := PreviewForm.VideoPanel;
      DeviceType:= dtAutoSelect; //set Device compatibility to AVI
      Open();
      DisplayRect:=PreviewForm.VideoPanel.ClientRect;
     ...
    end;

Видео выводится, но у меня на этой панели еще лежат Image, в которых после вывода видео рисуется текст надписей.

Мне надо вывести на этот кадр надписи.

Вместо этого получается, что мигнут надписи, а потом все закрывает кадр видео. Если по нему провести посторонним окном, видео стирается и появляются надписи.
Как сделать, чтобы получилось как мне надо?


 
Ray ©   (2006-05-24 08:40) [5]

Кстати, вот тут исходник этого модуля (12 кБт).
http://r7.org.ru/files/trabla.zip


 
Ray ©   (2006-05-26 09:36) [6]


> Вот пример из книги "win32 Api в Delphi" для Delphi7 8кб
> В нем определяется число кадров в фильме его длительность
> и
> сохраняется в bmp кадр соответствующий trackBar
> http://programania.com/avi2bmp.zip


В общем, тут то, что надо. Но оно работает ДИКО ТОРМОЗНО :(
В плеерах же скакание по кадрам происходит довольно бодро. Интересно, как этого достичь?



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

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

Наверх




Память: 0.48 MB
Время: 0.027 c
4-1142617056
KALqYAN
2006-03-17 20:37
2006.06.11
Open -> My Computer, My Documents, Control Panel...


2-1148416743
Helen
2006-05-24 00:39
2006.06.11
Кнопка


11-1128106300
Sniper17
2005-09-30 22:51
2006.06.11
Владимир, выложите на вашем сайте 2.13 которую потом


2-1148401854
Juice
2006-05-23 20:30
2006.06.11
Перетаскивание формы


6-1139143610
Интересующийся
2006-02-05 15:46
2006.06.11
Организация Broabcast для TClientSocket