Аудио.Длительность (Audio.Duration) Свойство

Копировать     Выделить всё

Перем ДФ;
Перем Аудио1;

Процедура Свойство() Экспорт
	Сообщить("Аудио1.Длительность = " + Аудио1.Длительность);
КонецПроцедуры

Процедура Форма1_Загружена() Экспорт
	ДФ.ПолучитьСвойство(Аудио1, "Длительность", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\DeclarativeForms\DeclarativeForms\bin\Debug\DeclarativeForms.dll");
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");

Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";

Форма1.Открыть();