Элемент.АвтоФокус (Element.AutoFocus) Свойство

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

Процедура Кнопка1_Нажатие() Экспорт
	Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры

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

Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");

Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Форма1;
Кнопка2.Текст = "Это Кнопка2";
Кнопка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;

Кнопка1.Автофокус = Истина;

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