Форум
Вход
Вход
Регистрация
Знания
1С:Предприятие
Инф. технологии
О жизни
Книга знаний
Учебные курсы
Wiki
Поиск
Секции
IT-новости
Веб-мастеринг
Администрирование
Жизнь форума
Наука и технологии
Юмор
Другие секции...
Работа
Обсуждения
Вакансии
О нас
О форуме
Правила
Рейтинг
Карта сайта
Объявления
Контакты
Имя:
Пароль:
Войти
1C
1C 7.7
v7: Видео в 1С 7.7 возможно ли? с помощью Shell.Explorer.2
☑
0
Volodja
18.03.23
✎
12:45
Перем обVideo;
//*******************************************
Процедура ПослеОткрытия()
ИмяФайлаHTML="C:\Users\VVV\Desktop\Video.html";
ИмяХТМЛ = "file:///"+ИмяФайлаHTML;
оФорма = СоздатьОбъект("Форма");
обVideo = оФорма.СоздатьЭлементУправленияНаФорме(Форма, "АктивИкс", "текстVideo");
обVideo.СоздатьЭУ("Shell.Explorer");
обVideo.Объект.Visible = - 1;
обVideo.Объект.Navigate(ИмяХТМЛ);
обVideo.Объект.StatusBar = -1;
КонецПроцедуры
C:\Users\VVV\Desktop\Video.html :
<!DOCTYPE html>
<html>
<head>
<meta charset="utf-8" />
<title>video</title>
</head>
<body>
<video
width="400"
height="300"
controls="controls"
poster="file:///E:/PHOTO_VIDEO/KKM.jpg"
>
<source
src="file:///E:/PHOTO_VIDEO/CELEBRATE.mp4"
type='video/mp4; codecs="avc1.42E01E, mp4a.40.2"'
/>
Элемент video не поддерживается !!! вашим браузером.
<a href="video/duel.mp4">Скачайте видео</a>.
</video>
</body>
</html>
Выдает только это:
Элемент video не поддерживается !!! вашим браузером.
1
Volodja
18.03.23
✎
12:46
Хотя сам браузер открывает страницу и видео воспроизводится.
2
MWWRuza
18.03.23
✎
16:33
Ээээ...
Может я чего-то в постановке задачи не понял... А зачем такие сложности?
ЗапуститьПриложение({путь к видеофайлу}) - чем не устраивает?
3
orefkov
18.03.23
✎
19:16
Через активикс запускается какая-то старинная версия IE, которая (неожиданно) не поддерживает элемент video.
4
АгентБезопасной Нацио
18.03.23
✎
20:08
(2) он хочет внутри 1с...
5
Volodja
19.03.23
✎
08:59
(3) Видимо, да.
Но изначально ставилась Windows 10. Откуда тогда взялся этот старый АктивХ...
6
alyuev
20.03.23
✎
12:03
Можно делать воспроизведение видео локальных файлов через
ИмяКонтрола = "WMPlayer.OCX.7"; АктивХ.СоздатьЭУ(ИмяКонтрола); Плеер = АктивХ.Объект;
7
Злопчинский
20.03.23
✎
22:24
(6) ух ты!
Ошибка? Это не ошибка, это системная функция.
Форум
|
Правила
|
Описание
|
Объявления
|
Секции
|
Поиск
|
Книга знаний
|
Вики-миста