Только чтение.
Тип: Булево.
Возвращает значение, указывающее, имеет ли объект фокусировку.
Истина - элемент управления имеет фокус, Ложь - в противном случае.
Сообщить("Кнопка1.Сфокусирован = " + Кнопка1.Сфокусирован);
Копировать Выделить всёПерем Ф, Кнопка1; Процедура Кнопка1_ПриВходе() Экспорт Сообщить("Кнопка1.Сфокусирован = " + Кнопка1.Сфокусирован); КонецПроцедуры Функция Кнопка1_ПриУходе() Экспорт Сообщить("Кнопка1.Сфокусирован = " + Кнопка1.Сфокусирован); КонецФункции ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Форма1.Текст = "Кликайте по кнопкам"; Кнопка1 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка()); Кнопка1.Текст = "Кнопка1"; Кнопка1.Положение = Ф.Точка(20, 20); Кнопка1.ТабФокус = Истина; Кнопка1.ПорядокОбхода = 7; Кнопка1.ПриВходе = Ф.Действие(ЭтотОбъект, "Кнопка1_ПриВходе"); Кнопка1.ПриУходе = Ф.Действие(ЭтотОбъект, "Кнопка1_ПриУходе"); Кнопка2 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка()); Кнопка2.Текст = "Кнопка2"; Кнопка2.Ниже(Кнопка1, 5); Кнопка2.ТабФокус = Истина; Кнопка2.ПорядокОбхода = 6; Кнопка3 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка()); Кнопка3.Текст = "Кнопка3"; Кнопка3.Ниже(Кнопка2, 5); Кнопка3.ТабФокус = Истина; Кнопка3.ПорядокОбхода = 1; Кнопка4 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка()); Кнопка4.Текст = "Кнопка4"; Кнопка4.Ниже(Кнопка3, 5); Кнопка4.ТабФокус = Истина; Кнопка4.ПорядокОбхода = 0; Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёПерем Ф, Кнопка1; Процедура Кнопка1_ПриВходе() Экспорт Сообщить("Кнопка1.Сфокусирован = " + Кнопка1.Сфокусирован); КонецПроцедуры Функция Кнопка1_ПриУходе() Экспорт Сообщить("Кнопка1.Сфокусирован = " + Кнопка1.Сфокусирован); КонецФункции ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Форма1.Текст = "Нажимайте Tab"; Кнопка1 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка()); Кнопка1.Текст = "Кнопка1"; Кнопка1.Положение = Ф.Точка(20, 20); Кнопка1.ТабФокус = Истина; Кнопка1.ПорядокОбхода = 7; Кнопка1.ПриВходе = Ф.Действие(ЭтотОбъект, "Кнопка1_ПриВходе"); Кнопка1.ПриУходе = Ф.Действие(ЭтотОбъект, "Кнопка1_ПриУходе"); Кнопка2 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка()); Кнопка2.Текст = "Кнопка2"; Кнопка2.Ниже(Кнопка1, 5); Кнопка2.ТабФокус = Истина; Кнопка2.ПорядокОбхода = 6; Кнопка3 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка()); Кнопка3.Текст = "Кнопка3"; Кнопка3.Ниже(Кнопка2, 5); Кнопка3.ТабФокус = Истина; Кнопка3.ПорядокОбхода = 1; Кнопка4 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка()); Кнопка4.Текст = "Кнопка4"; Кнопка4.Ниже(Кнопка3, 5); Кнопка4.ТабФокус = Истина; Кнопка4.ПорядокОбхода = 0; Кнопка1.Фокус(); Сообщить(?( Кнопка1.Сфокусирован , "", "!!! ") + "ЭлементУправления.Сфокусирован (Control.Focused) Свойство" + " " + ТекущаяДата());
ЭлементУправления (Control) Класс | Библиотека OneScriptForms