Реализовать повторное воспроизведение видео

@vaniak1 · Регистрация: 25.11.2015

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

Доброго дня!
На форме кнопка, при нажатии на которую необходимо воспроизвести видео на весь экран и затем по окончании просто закрыть видео-окно и показать форму обратно. Реализовал через WindowsMediaPlayer, в настройках указал Полноэкранный вид, счетчик воспроизведения=1, режим None
Запуск реализован через:

VB.NET
1
2
        AxWindowsMediaPlayer1.URL = Application.StartupPath & "\avi" & k & ".avi"
        AxWindowsMediaPlayer1.Ctlcontrols.play()

В итоге - при первом нажатии всё работает. Потом видео закончилось, само закрылось и при последующих нажатиях заново не запускается. Как исправить и сделать возможность повторного запуска? Через таймер? Но как получить длительность видео? В форуме не нашел, искал долго. Может кто сталкивался уже? Спасибо.

@Дядя Корней · 23.12.2015, 15:58

vaniak1, попробуй при каждом нажатии объявлять плеер как новый экземпляр, а старый удаляй, стало быть в юзинг его оберни.

@vaniak1 · 23.12.2015, 16:57 **[ТС]**

Не подскажете в конкретном коде?
Спасибо

@Дядя Корней · 23.12.2015, 17:20

vaniak1,

VB.NET
1
2
3
4
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim wmPlayer As New WindowsMediaPlayer
        wmPlayer.URL = "путь до файла\sound.wav"
    End Sub

@vaniak1 · 23.12.2015, 17:57 **[ТС]**

VB.NET
1
2
3
4
5
6
7
8
 
Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
 
        Dim wmPlayer As New AxWMPLib.AxWindowsMediaPlayer
      
        wmPlayer.URL = Application.StartupPath & "\avi" & k & ".avi"
        wmPlayer.Ctlcontrols.play()
    End Sub

При попытке запуска на строке, где URL: Необработанное исключение типа "System.Windows.Forms.AxHost.InvalidActi veXStateException" в AxInterop.WMPLib.dll

@Дядя Корней · 23.12.2015, 18:09

vaniak1, что такое AxWindowsMediaPlayer?
Ax откуда это?

Мой пример для WindowsMediaPlayer
Что такое AxWindowsMediaPlayer я честно говоря не знаю.

@vaniak1 · 23.12.2015, 18:17 **[ТС]**

Делаю так: Открываю свой проект, далее сверху в меню выбираю "Сервис" - "Выбрать элементы панели элементов...", далее выбираю вкладку "COM" там ставлю галочку на элементе "Windows Media Player" в панели элементов у меня появляется Windows Media Player, кидаю его на форму...

@Yury Komar · 23.12.2015, 18:24

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

wmPlayer.URL = Application.StartupPath & "\avi" & k & ".avi"

здесь наверное после "\avi" еще один слэш нужен? тиоесть так -> "\avi\"

@vaniak1 · 23.12.2015, 19:48 **[ТС]**

Не знаю, почему не скопировалось в прошлый раз. Код такой:

VB.NET
1
        wmPlayer.URL = Application.StartupPath & "\avi" & k & ".avi"

Он и не работает

Почему-то форум выбрасывает второй слэш, который перед кавычками за словом avi. В программе он стоит.

Добавлено через 1 час 20 минут
Всё-таки "добил" и реализовал через

VB.NET
1
2
3
Dim wmPlayer As New WMPLib.WindowsMediaPlayer
         wmPlayer.URL = Application.StartupPath & "\avi" & k & ".avi"
        wmPlayer.controls.play()

Однако фокус не удался и теперь программа хоть и не ругается, но и не запускает ничего.

В-итоге на настоящий момент самое рабочее получается

VB.NET
1
2
        AxWindowsMediaPlayer1.URL = Application.StartupPath & "\avi" & k & ".avi"
        AxWindowsMediaPlayer1.Ctlcontrols.play()

но после первого воспроизведения обратно еще раз не запустить

Новые блоги и статьи Все статьи Все блоги /
Вот уже год прошел, как у меня домен в reg.ru ... Etyuhibosecyu 16.04.2026 И ничего они мне не сделали. Если отвязать карту, никакие услуги они не навяжут. Я бы с радостью продлил еще на два года, чтобы не мучиться с временным доменом и меня уже знали по red-star-soft. com,. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача №1: при указании работ (справочник РаботыПоРемонтуСпецтехники),. . .

@Дядя Корней 399 / 318 / 53 Регистрация: 14.08.2014 Сообщений: 1,010
	23.12.2015, 15:58
	vaniak1, попробуй при каждом нажатии объявлять плеер как новый экземпляр, а старый удаляй, стало быть в юзинг его оберни. 0

@vaniak1 4 / 4 / 1 Регистрация: 25.11.2015 Сообщений: 26
	23.12.2015, 16:57 [ТС]
	Не подскажете в конкретном коде? Спасибо 0

@Дядя Корней 399 / 318 / 53 Регистрация: 14.08.2014 Сообщений: 1,010
	23.12.2015, 18:09
	vaniak1, что такое AxWindowsMediaPlayer? Ax откуда это? Мой пример для WindowsMediaPlayer Что такое AxWindowsMediaPlayer я честно говоря не знаю. 0

@vaniak1 4 / 4 / 1 Регистрация: 25.11.2015 Сообщений: 26
	23.12.2015, 18:17 [ТС]
	Делаю так: Открываю свой проект, далее сверху в меню выбираю "Сервис" - "Выбрать элементы панели элементов...", далее выбираю вкладку "COM" там ставлю галочку на элементе "Windows Media Player" в панели элементов у меня появляется Windows Media Player, кидаю его на форму... 0