Видео плеер

@DeN-6666 · Регистрация: 24.07.2013

Студворк — интернет-сервис помощи студентам

Пишу свой видео плеер (т.к. придумал фишку, которой не встречал в других плеерах). Нужна толковая библиотека для воспроизведения видео (форматы avi mkv flv mp4 ну и другие по возможности). Стандартный компонент медиаплеер зверски глючит на большей части файлов (о чём все и без меня знают).

@саша40 · 21.09.2013, 21:34

Сообщение от DeN-6666

Короче говоря я забил на DirectShow и стал юзать bass_dshow.dll библиотеку.

1)Немогу разобраться с отображением позиции файла (какая часть файла проигрывается). Попробывал через trackbar и таймер 1 сек. В результате получается зависание звука и картинки через каждую секунду, хотя трэкбар смещается по позиции. Как я понял позиция в библиотеке отображается в типом real , а трэкбар работает
с типом integer.

2) как отобразить позицию файла в часах\минутах\секундах ?

Если бы ты изучал сначало Bass, то было бы легче писать.
Попробую тебе написать.
Для обоих функция xVideo_ChannelGetPosition(Chan: HStream; Mode: DWORD);
У функции есть флаг, который тебе и нужен:
xVideo_POS_SEC-функция выдаст позицию воспроизведения файла в секундах(То есть, то что тебе надо для обеих вопросов, если надо узнать позицию текущего фрейма(кадра из видео), то xVideo_POS_FRAME в качестве флага для функции). Функция имееть тип Double, от которого пошел тип Real. Функция Round округлит позицию до Integer. И дальше выводишь на позицию TrackBar или ScrollBar. Для того, чтобы не выскакивала ошибок, надо записать ещё и длину. xVideo_ChannelGetLength c флагом xVideo_POS_SEC. Её надо тоже округлить функцией Round в свойство Max у компонента.
2) Для того, чтобы отобразить позицию и длину воспроизводимого потока(из видеофайла создается поток типа HStream), надо сначала записать в переменные типа Double длину и позицию(interval у таймера ставь на 40), следом в другие две переменные того же типа выводим результат деления первых переменых на 3600*24, то есть на кол-во секунд в сутках. Следом уже с помощью FormatDateTime преобразуем результат в строку. Вот код:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
var
TrackPos,TrackLen: Double; //первые переменные
ValPos,ValLen: Double; //вторые переменные
begin
...//какой-то код
TrackPos:=xVideo_ChannelGetPosition(Channel,xVideo_POS_SEC);
TrackLen:=xVideo_ChannelGetLength(Channel,xVideo_POS_SEC);
ValPos:=TrackPos / (24*3600);
ValLen:=TrackLen / (24*3600);
Label1.Caption:=FormatDateTime('hh:mm:ss',ValPos) + '/' + FormatDateTime('hh:mm:ss',ValLen);
//в лебел отразится в часах, минутах, секундах позиция / длина воспроизводимого файла. 
end;

За основу был взят код с этого сайта: http://basicsprog.ucoz.ru/publ/6-1-0-18

Новые блоги и статьи Все статьи Все блоги /
Копировать Windows на новый диск на UEFI damix 17.10.2026 https:/ / uriesk. wordpress. com/ 2016/ 11/ 01/ move-window-10-to-ssd-on-a-uefi-dualboot-system-with-basic-linux-tools/ TL DR Вставляем диск, а старый подключаем через переходник, грузимся с лайва. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .

@DeN-6666 3 / 3 / 0 Регистрация: 24.07.2013 Сообщений: 77

	Видео плеер 11.08.2013, 21:07. Показов 5999. Ответов 20 Метки нет (Все метки) Пишу свой видео плеер (т.к. придумал фишку, которой не встречал в других плеерах). Нужна толковая библиотека для воспроизведения видео (форматы avi mkv flv mp4 ну и другие по возможности). Стандартный компонент медиаплеер зверски глючит на большей части файлов (о чём все и без меня знают). 0