Видеоплеер на Lazarus. Возможно ли?

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Аватара пользователя
crazynetwork
незнакомец
Сообщения: 9
Зарегистрирован: 07.02.2016 17:06:06
Контактная информация:

Сообщение crazynetwork »

PasLibVlcPlayer1.VLC.StartOptions.Add('vout-filter=deinterlace');
PasLibVlcPlayer1.VLC.StartOptions.Add('deinterlace-mode=blend');

Не работает. Плагины в папочке все есть.
Аватара пользователя
BadBoyAlex
постоялец
Сообщения: 119
Зарегистрирован: 08.06.2010 12:42:23
Откуда: Россия, Белгород
Контактная информация:

Сообщение BadBoyAlex »

crazynetwork писал(а):Вероятно для Лазаруса, есть свой способ это сделать.

И... Я, кажется нашёл его.

Для начала читать здесь.
Потом здесь и здесь.
И, наконец, сам код, который мне помог:

Код: Выделить всё

procedure TVideoPlayerFrm.SetVolume (const AVolume: Integer);
var OldFPUExceptionMask: TFPUExceptionMask;
begin
OldFPUExceptionMask:= GetExceptionMask;
SetExceptionMask([exInvalidOp, exDenormalized, exZeroDivide, exOverflow, exUnderflow, exPrecision]);
VideoPlayer.SetAudioVolume(AVolume);
SetExceptionMask(OldFPUExceptionMask);
end;
Аватара пользователя
crazynetwork
незнакомец
Сообщения: 9
Зарегистрирован: 07.02.2016 17:06:06
Контактная информация:

Сообщение crazynetwork »

По стартовым опциям vlc кто то что то может подсказать?
Аватара пользователя
Снег Север
долгожитель
Сообщения: 3071
Зарегистрирован: 27.11.2007 15:14:47
Контактная информация:

Сообщение Снег Север »

crazynetwork
если судить по модулю PasLibVlcPlayerUnit.pas, то вы в своем коде действовали верно - надо именно с -- добавлять. Так что не могу сказать, почему не работает...
Аватара пользователя
crazynetwork
незнакомец
Сообщения: 9
Зарегистрирован: 07.02.2016 17:06:06
Контактная информация:

Сообщение crazynetwork »

Оказывается у компонента PasLibVlcPlayer1 есть в инспекторе свойст свойства
DeinterlaceFilter и DeinterlaceMode, выставил там свойства, все равно не работает. Обратился к разрабу, он отписал что надо заюзать такой код:

PasLibVlcPlayer1.Play();
libvlc_video_set_deinterlace(PasLibVlcPlayer1.GetPlayerHandle(), PAnsiChar('blend'));

Но все равно не работает. Может быть кто то может из вас проверить, может это у меня руки кривые? =)
Аватара пользователя
Снег Север
долгожитель
Сообщения: 3071
Зарегистрирован: 27.11.2007 15:14:47
Контактная информация:

Сообщение Снег Север »

crazynetwork, простите за тупой вопрос, но на стандартном плейере на вашем компе эти параметры работают? вы проверяли?
Аватара пользователя
crazynetwork
незнакомец
Сообщения: 9
Зарегистрирован: 07.02.2016 17:06:06
Контактная информация:

Сообщение crazynetwork »

Да, на стандартном vlc все работает. Я позже выложу скрин.

Добавлено спустя 5 часов 1 минуту 7 секунд:
Изображение
Изображение
Изображение
Аватара пользователя
crazynetwork
незнакомец
Сообщения: 9
Зарегистрирован: 07.02.2016 17:06:06
Контактная информация:

Сообщение crazynetwork »

Форум вообще живой?
Alex2013
долгожитель
Сообщения: 3234
Зарегистрирован: 03.04.2013 11:59:44

Сообщение Alex2013 »

Дык а куда он денется ... просто картинки рюшечки видео плеера вдохновения не вызывают.... Вот если бы это был бы проект например создания три-де миров из обычного видео ... А так ... НУ ЕЩЕ ОДИН VCL ... тоска ... :roll: НАРОД! Где мобилизующие планы ?!!! :idea:
alex208210
постоялец
Сообщения: 207
Зарегистрирован: 12.05.2010 13:16:51

Сообщение alex208210 »

ну или хотябы реализация этого плеера на wince / android . А тут.. очередной кривой плеер под винду. Тоска
Ответить