Элемент.ДвойноеНажатие (Element.DoubleClick) Метод

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

Перем ДФ, Абзац1;

Процедура Форма1_Загружена() Экспорт
	Абзац1.ДвойноеНажатие();
КонецПроцедуры

Процедура Абзац1_ДвойноеНажатие() Экспорт
	Сообщить(?(
	Абзац1.КлавишаДоступа = "w"
	, "", "!!! ") + "КлавишаДоступа_Абзац_свойство.os" + " " + ТекущаяДата());
	ДФ.ЗавершитьРаботу();
КонецПроцедуры

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

Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.Высота = 60;
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Абзац1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Абзац1_ДвойноеНажатие");
Абзац1.КлавишаДоступа = "w";

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