Чтение и запись.
Тип: ЭлементУправления (Control).
Возвращает или задает кнопку, которая срабатывает при нажатии клавиши ESC.
Форма1.КнопкаОтмена = Кнопка1;
Копировать Выделить всёПроцедура Кнопка1_Нажатие() Экспорт Сообщить("Кнопка1"); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Кнопка1 = Ф.Кнопка(); Кнопка1.Родитель = Форма1; Кнопка1.Высота = 60; Кнопка1.Ширина = 200; Кнопка1.Текст = "Нажми клавишу ESC"; Кнопка1.Нажатие = Ф.Действие(ЭтотОбъект, "Кнопка1_Нажатие"); Форма1.КнопкаОтмена = Кнопка1; Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёПроцедура Кнопка1_Нажатие() Экспорт Сообщить("Кнопка1"); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Кнопка1 = Ф.Кнопка(); Кнопка1.Родитель = Форма1; Кнопка1.Высота = 60; Кнопка1.Ширина = 200; Кнопка1.Текст = "Нажми клавишу ESC"; Кнопка1.Нажатие = Ф.Действие(ЭтотОбъект, "Кнопка1_Нажатие"); Форма1.КнопкаОтмена = Кнопка1; Сообщить(?( Форма1.КнопкаОтмена = Кнопка1 , "", "!!! ") + "Форма.КнопкаОтмена (Form.CancelButton) Свойство" + " " + ТекущаяДата());