Не показывает видео при компиляции через Dephi

[Aliens_wolfs]

Судя по его скринам там вообще даже рамки видео нет, возможно плеер wb_MediaPlayer1 не найден, так вот предлагаю попробовать другим плеером открывать видео например uppod описание в интернете есть и путь то что я описывал попробуйте исправить

[DIONISKA]

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

Судя по его скринам там вообще даже рамки видео нет..

Рамок там просто нет, ибо браузеру не удаётся интерпретировать тэг, обычно там пишется замещающий текст:

<video controls>
	<source src="../videos/sample.mp4" type="video/mp4">
	<p>Your browser does not support H.264/MP4.</p>
</video>

или пустое место, если его нет.

[vitali9405]

Внесу немного сумятицы в вашу беседу, тэг <video> поддерживается начиная с IE9, а у ТС TWebbrowser, который по-умолчанию работает в режиме совместимости c IE7(если не изменяет память), лечится добавлением примерно следующего кода в раздел инициализации:


Код который вы отправили куда нужно добавить?

[vitali9405]

<video controls>
	<source src="../videos/sample.mp4" type="video/mp4">
	<p>Your browser does not support H.264/MP4.</p>
</video>

этот код куда мне его вписать?

[vitali9405]

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

Внесу немного сумятицы в вашу беседу, тэг <video> поддерживается начиная с IE9, а у ТС TWebbrowser, который по-умолчанию работает в режиме совместимости c IE7(если не изменяет память), лечится добавлением примерно следующего кода в раздел инициализации:

var
  reg:TRegistry;
  key:string;

initialization
{$IFDEF MSWINDOWS }
reg:=TRegistry.Create;
reg.RootKey := HKEY_CURRENT_USER;
// для записи в HKEY_LOCAL_MACHINE нужно учитывать архитектуру:
//if TOSVersion.Architecture=arIntelX64 then
// key:='SOFTWARE\Wow6432Node\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION\' else
// key:='SOFTWARE\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION\';
key:='SOFTWARE\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION\';
reg.OpenKey(key,true);
if reg.ValueExists(ExtractFileName(ParamStr(0))) then
  else reg.WriteInteger(ExtractFileName(ParamStr(0)),$00002af9);// это значение для ie11, остальное см: https://msdn.microsoft.com/en-us/library/ee330730%28VS.85%29.aspx#browser_emulation
  reg.CloseKey;
  reg.Free;
{$ENDIF}

Ответьте пожалуйста, куда вставить этот код?

[vitali9405]

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

Судя по его скринам там вообще даже рамки видео нет, возможно плеер wb_MediaPlayer1 не найден, так вот предлагаю попробовать другим плеером открывать видео например uppod описание в интернете есть и путь то что я описывал попробуйте исправить

А как изменить плеер?

[Aliens_wolfs]

Вначале попробуйте путь правильно написать на видео

что я описал Пост#9 src="./standarty%20setey.mp4"

Подправьте в коде вашего скрина в посте#5

[DIONISKA]

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

куда вставить этот код?

В раздел инициализации. Просто вставить перед 'End.' в конце юнита с формой, где создаётся TWebbrowser или в .dpr перед созданием формы, но убрать 'initialization'. А вот этот:

<video controls>
	<source src="../videos/sample.mp4" type="video/mp4">
	<p>Your browser does not support H.264/MP4.</p>
</video>

никуда, это кусок html, который показывает надпись "Your browser does not support H.264/MP4.", если тэг <Video> не поддерживается.


Upd: а ещё если у вас в имени файла есть русские буквы или символы (пробел в их числе),то они должны быть приведены URI-подобному виду, то-есть вместо "мой файл.mp4" должно быть "%D0%BC%D0%BE%D0%B9%20%D1%84%D0%B0% D0%B9%D0%BB.mp4", что вам и советовали выше.