Стиль.ЗадержкаПерехода (Style.TransitionDelay) Свойство

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

Перем ДФ, Блок1;

Процедура МышьНадЭлементом() Экспорт
	Блок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
	Блок1.Стиль.Ширина = 300;
	Блок1.Стиль.Высота = 200;
КонецПроцедуры

Процедура МышьПокинулаЭлемент() Экспорт
	Блок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
	Блок1.Стиль.Ширина = 100;
	Блок1.Стиль.Высота = 100;
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\DeclarativeForms\DeclarativeForms\bin\Debug\DeclarativeForms.dll");
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;

Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 100;
Блок1.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Красный);
Блок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Блок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");

Переход1 = ДФ.Переход();
Переход1.СвойствоПерехода = ДФ.СвойствоПерехода.Все;
Переход1.ВремяПерехода = 1500;
Переход1.ФункцияПерехода = ДФ.ФункцияПерехода.МедленноВконце;
Переход1.ЗадержкаПерехода = 100;

Блок1.Стиль.Переход = Переход1;

Блок1.Стиль.ЗадержкаПерехода = 1000;

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