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