Имя: Пароль:
1C
1С v8
Еще раз про WMP на форме.
0 OleLukoye
 
23.07.13
14:35
Добрый день. Нужно воспроизвести видео на форме. код следующий:
Процедура ПриОткрытии()
   // Вставить содержимое обработчика.
   ЭлементыФормы.ВидеоПлеер.controls().stop();
   ЭлементыФормы.ВидеоПлеер.URL = "D:\Documents\kassa24.wmv";
   ЭлементыФормы.ВидеоПлеер.settings.SetMode("loop", true);
   //ЭлементыФормы.ВидеоПлеер.uiMode = "none";
   ЭлементыФормы.ВидеоПлеер.controls().play();
       ЭлементыФормы.ВидеоПлеер.fullScreen = "true";
КонецПроцедуры

Ошибка при установке значения атрибута контекста (fullScreen)
ЭлементыФормы.ВидеоПлеер.fullScreen = "true";
по причине:
Произошла исключительная ситуация (0x8000ffff)

Кто может объяснить как правильно установить видео в fullScreen. Или на крайний случай установить программно "увеличение в 200%".
Если кто может предложить другие компоненты - прошу выложить код.
1 OleLukoye
 
24.07.13
11:00
Пожалуй подниму. Никто не в курсе?
2 OleLukoye
 
24.07.13
13:31
Решил - может кому помогу
Судя по http://www.vbdotnetforums.com/windows-forms/23774-full-screen-wmp.html
Нужно на методе PlayStateChange добавить проверку если файл играет то установить Фуллскрин. Что то вроде этого:

Процедура ВидеоПлеерPlayStateChange(Элемент, NewState)
   // Вставить содержимое обработчика.
   Плеер = ЭлементыФормы.ВидеоПлеер;
   Если Плеер.playState = 3 Тогда
       Плеер.fullScreen = Истина;
   КонецЕсли;    
КонецПроцедуры
Компьютеры — прекрасное средство для решения проблем, которых до их появления не было.