Элемент.Нажатие (Element.Click) Метод

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

Перем ДФ, Абзац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.Открыть();