Чтение и запись.
Тип: Действие (Action).
Возвращает или задает код для события, которое происходит, когда отпускается клавиша, если элемент управления имеет фокус.
Форма1.КлавишаВверх = Ф.Действие(ЭтотОбъект, "Форма1_КлавишаВверх");
Копировать Выделить всёПерем Ф; Процедура Форма1_КлавишаВверх() Экспорт КлавишаАрг1 = Ф.КлавишаАрг(); Сообщить("КлавишаАрг1.Alt = " + КлавишаАрг1.Alt); Сообщить("КлавишаАрг1.Ctrl = " + КлавишаАрг1.Ctrl); Сообщить("КлавишаАрг1.Shift = " + КлавишаАрг1.Shift); Сообщить("КлавишаАрг1.КодКлавиши = " + КлавишаАрг1.КодКлавиши); Сообщить("КлавишаАрг1.Модификаторы = " + КлавишаАрг1.Модификаторы); Сообщить("================================="); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Текст = "Нажмите клавишу на клавиатуре"; Форма1.Ширина = 480; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Форма1.КлавишаВверх = Ф.Действие(ЭтотОбъект, "Форма1_КлавишаВверх"); Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёПерем Ф; Процедура Форма1_КлавишаВверх() Экспорт КлавишаАрг1 = Ф.КлавишаАрг(); Сообщить("КлавишаАрг1.Alt = " + КлавишаАрг1.Alt); Сообщить("КлавишаАрг1.Ctrl = " + КлавишаАрг1.Ctrl); Сообщить("КлавишаАрг1.Shift = " + КлавишаАрг1.Shift); Сообщить("КлавишаАрг1.КодКлавиши = " + КлавишаАрг1.КодКлавиши); Сообщить("КлавишаАрг1.Модификаторы = " + КлавишаАрг1.Модификаторы); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Форма1.КлавишаВверх = Ф.Действие(ЭтотОбъект, "Форма1_КлавишаВверх"); Сообщить(?( Форма1.КлавишаВверх.ИмяМетода = "Форма1_КлавишаВверх" , "", "!!! ") + "ЭлементУправления.КлавишаВверх (Control.KeyUp) Свойство" + " " + ТекущаяДата());
ЭлементУправления (Control) Класс | Библиотека OneScriptForms