Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Нужен совет... / 25 сообщений из 29, страница 1 из 2
18.03.2014, 11:46
    #38589167
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Сейчас рассматриваю проект для обработки видео. Общая суть такая: есть видео поток, мне надо разбивать его на два потока, один каждую четную секунду, другой следующую. Посоветуйте в чем удобней этим заняться ? Если брать Паскаль в котором я нормально рублю - то там мало нормальных библиотек для обработки видео потоков. А если брать что-нибудь другое, то я знаю только основы да и вообще не знаю как там с видеопотоками.... Посоветуйте в чем лучше вам кажется ?
...
Рейтинг: 0 / 0
18.03.2014, 11:52
    #38589179
wadman
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Mash6aЕсли брать Паскаль в котором я нормально рублю - то там мало нормальных библиотек для обработки видео потоков.
Ух ты. :) в гугл потом отправлю, а пока вопрос: от проекта больше ничего не нужно, кроме как один файл разбить на два?
...
Рейтинг: 0 / 0
18.03.2014, 12:55
    #38589273
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
На данной стадий нет, надо хотя бы чтобы потоки разбивал. Я разбирала TMediaPlayer компонент в Delphi такой баганутый, что застрелиться. А необходимо чтобы он любой видеоформат открывал или популярные.
...
Рейтинг: 0 / 0
18.03.2014, 13:51
    #38589395
k0rvin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Mash6aНа данной стадий нет, надо хотя бы чтобы потоки разбивал. Я разбирала TMediaPlayer компонент в Delphi такой баганутый, что застрелиться. А необходимо чтобы он любой видеоформат открывал или популярные.

Может стоит глянуть исходники mplayer или vlc, они довольно всеядны, правда там С/С++.
...
Рейтинг: 0 / 0
18.03.2014, 14:05
    #38589431
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Повожусь c Делфиком сегодня, вечером что-нить придумаю
...
Рейтинг: 0 / 0
18.03.2014, 14:06
    #38589434
Изопропил
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
k0rvinmplayer или vlc
Gui то зачем смотреть?

ffmpeg достаточно
...
Рейтинг: 0 / 0
18.03.2014, 16:23
    #38589693
wadman
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Два варианта на вскидку:
1. Вirect x фильтр на видео (аудио тоже, если необходимо) поток.
2. Плагин(ы) к AviSynth (google: avisynth_pascal_v5.rar)
...
Рейтинг: 0 / 0
18.03.2014, 19:27
    #38589906
mayton
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Mash6a, посмотри исходники VirtualDub
http://sourceforge.net/projects/virtualdub/files/virtualdub-win/

\
...
Рейтинг: 0 / 0
18.03.2014, 19:39
    #38589920
k0rvin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Изопропилk0rvinmplayer или vlc
Gui то зачем смотреть?

ffmpeg достаточно

При чем тут GUI? У mplayer'а так его вообще нет. ffmpeg же только кодек, а ТСу вроде как пример работы с декодированными потоками нужен (ну и как для этого использовать кодеки). Вот mplayer как самое то. Или mencoder.
...
Рейтинг: 0 / 0
20.03.2014, 11:27
    #38591598
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Привет Ребят! Работаю пока в DElphi. Первая прям проблема, блин, приложила скрин ниже. А есть ли возможность поставить другие кодеки чтобы читать что-то кроме avi ?
...
Рейтинг: 0 / 0
20.03.2014, 11:28
    #38591600
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
...
Рейтинг: 0 / 0
20.03.2014, 12:13
    #38591656
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Все разобралась. Помогите мне с идеей как выводить видео в разные потоки, одну секунду на одину панель, другую на вторую
...
Рейтинг: 0 / 0
22.03.2014, 14:43
    #38593579
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Помогите... Мне нужно с помощью тимера выводить каждую 2 сукунду на другую панель, как это сделать ?
...
Рейтинг: 0 / 0
22.03.2014, 14:56
    #38593582
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Не понимаю... Если выводить каждую вторую секунду, то придется создавать второй плеер ? А если скрингот делать, то с напели он не делается... Помогите
...
Рейтинг: 0 / 0
22.03.2014, 15:09
    #38593588
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
вот такая ошибка, я пытаюсь запустить видео на дргой панели с другого проигрывателя, но с позиции которую выдает первый плеер
...
Рейтинг: 0 / 0
23.03.2014, 12:31
    #38593875
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
DirectShow пытаюсь в нем разобраться. Если кто-нибудь сталкивался с изъятием кадра из оппределенного места видео, помогите... Пожалуйста
...
Рейтинг: 0 / 0
23.03.2014, 13:08
    #38593892
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Нашла парочку функции, но почемуто на Image выводиттся только черный экран... Что я не так сделала ??
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
procedure TForm1.Button5Click(Sender: TObject);
var cc1,cc2: TControlCanvas;
    i,j:integer;
begin
if (MediaPlayer1.FileName='') then Exit
  else
  cc1:=TControlCanvas.Create;
  cc2:=TControlCanvas.Create;
  cc1.Control:=Panel1;
  cc2.Control:=Image1;
  for i := 0 to Panel1.Width do
    for j := 0 to Panel1.Width do
      cc2.Pixels[i,j]:=cc1.Pixels[i,j]; 
end;
...
Рейтинг: 0 / 0
23.03.2014, 19:44
    #38594019
mayton
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Наверное в одном из циклов надо заменить Width на Height
...
Рейтинг: 0 / 0
23.03.2014, 20:33
    #38594030
krapotkin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
procedure TForm1.Button5Click(Sender: TObject);
var cc1,cc2: TControlCanvas;
    i,j:integer;
begin
if (MediaPlayer1.FileName='') then Exit
  else
  cc1:=TControlCanvas.Create;
  cc2:=TControlCanvas.Create;
  cc1.Control:=Panel1;
  cc2.Control:=Image1;
  for i := 0 to Panel1.Width do
    for j := 0 to Panel1.Width do
      cc2.Pixels[i,j]:=cc1.Pixels[i,j]; 
end;


а еще после else добавить begin и удвоить end
это если говорить конкретно про этот код.

а с т.з. решения задачи требуется совсем не тривиальное программирование
нужно спрограммировать directshow фильтр, который будет делать то, что требуется
...
Рейтинг: 0 / 0
23.03.2014, 20:42
    #38594033
mayton
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
krapotkin, дай ей ссылку на HelloWorld с фильторм если есть такое. Я честно говоря даже не знаю в какую
это предметную область. Может разработка под DirectX или DXVA.
...
Рейтинг: 0 / 0
23.03.2014, 20:49
    #38594036
krapotkin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
тут и правда все не просто
не зря библиотечки для видеоштучек от $700

ну вот ресурс например
http://basicsprog.ucoz.ru/publ/6
...
Рейтинг: 0 / 0
24.03.2014, 12:53
    #38594431
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Поменял Width на Height - ничего не поменялось. Я подозреваю, что он вставляет первый кадр самый темный. Если на пустой панели нажать, то она пустая и покажется. DirectShow такая поебе*ь (простите прекрасный пол за нервозность)... как разделить этот дурацкии видео поток. Второй поток запустить мне не удалось, сколько бы я не возилась, т.к. пишет, что одно и тоже и запускать не хочет... Пока моя голова забита возможность снять скриншот с видеопотока. Если скрин с панели снять сложно, то может можно с отдельного окна снять... Если кто-нибудь что-нибудь знает напишите пожалуйста...:)
...
Рейтинг: 0 / 0
24.03.2014, 12:58
    #38594442
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Доперла... Сделаю вторую форму. Поставлю ее на дисплей MediaPlayr-а. Потом с помощью WinApi сделаю скрин с формы и повешу на первую форму. Во как... Как вам моя идейка ?
...
Рейтинг: 0 / 0
24.03.2014, 13:17
    #38594470
mayton
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
Mash6aПоменял Width на Height
Маш. Мой камент просто был замечанием. Типа шёл-шёл - пирожок нашёл.
Если я вижу вложенный цикл по растру то глазами проверяю внешний по width, а внутренний
по height. И разумеется мой совет - был советом "носить шерстяные штаны зимой" и не кушать
с пола. Твою задачу он не решает но является корректирующим дополнением.

Вот как-то так.
...
Рейтинг: 0 / 0
24.03.2014, 13:32
    #38594499
Mash6a
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужен совет...
mayton, да я не против, я не надеялась что это решит проблему, просто отписалась
...
Рейтинг: 0 / 0
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Нужен совет... / 25 сообщений из 29, страница 1 из 2
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]