Чтение и запись.
Тип: Действие (Action).
Возвращает или задает код для события, когда пользователь дважды щёлкает по элементу или нажимает клавишу Enter, чтобы открыть выбранный элемент.
Источником для поля выбора служит СписокЗначений (ValueList) из OneScript. Свойство АргументыСобытия.Значение (EventArgs.Value) будет иметь тип ЭлементСпискаЗначений (ValueListItem).
Значение (Value) |
Возвращает значение элемента. |
ИндексВыбранного (SelectedItem) |
Возвращает индекс выбранного элемента. |
Отправитель (Sender) |
Возвращает источник (объект) последнего события. |
Параметр (Parameter) |
Возвращает объект, заданный при установке обработчика события, для передачи в обработчик события. |
ПолеВыбора1.ПриОткрытииВыбранного = ТФ.Действие(ЭтотОбъект, "ПолеВыбора1_ПриОткрытииВыбранного");
Перем ТФ, ПолеВыбора1; Процедура ПриОткрытии() Экспорт ТФ.Верхний.Текст = "Выберите и кликните элемент в поле выбора."; ПолеВыбора1.УстановитьФокус(); ПолеВыбора1.Развернуть(); ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик", 2000); КонецПроцедуры Процедура ТаймерТик() Экспорт ТФ.ОтправитьКлавишуКонсоли(ТФ.КлавишиКонсоли.Enter); КонецПроцедуры Процедура ПолеВыбора1_ПриОткрытииВыбранного() Экспорт АргументыСобытия = ТФ.АргументыСобытия; ЭлементСпискаЗначений = АргументыСобытия.Значение; ТФ.Верхний.Текст = "Выберите и кликните элемент в поле выбора. |ПолеВыбора1_ПриОткрытииВыбранного = " + ТекущаяУниверсальнаяДатаВМиллисекундах() + " |Отправитель = " + АргументыСобытия.Отправитель + " |ИндексВыбранного = " + АргументыСобытия.ИндексВыбранного + " |Значение = " + ЭлементСпискаЗначений.Значение + " |Представление = " + ЭлементСпискаЗначений.Представление + " |"; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); ПолеВыбора1 = ТФ.Верхний.Добавить(ТФ.ПолеВыбора(0, 0)); ПолеВыбора1.ЦветоваяСхема = ТФ.Цвета.Основа; СписокЗначений1 = ПолеВыбора1.Источник; СписокЗначений1.Добавить("Дядя Фёдор - мальчик, у которого прозвище ""Дядя"".", "Дядя Фёдор"); СписокЗначений1.Добавить("Матроскин - кот, хозяйственный, имеет коров и собственное хозяйство.", "Матроскин"); СписокЗначений1.Добавить("Шарик - пёс, добрый, весёлый, простой, любит современные вещи.", "Шарик"); СписокЗначений1.Добавить("Галчонок. Очень хитрый, любит воровать еду пока никто не видит.", "Галчонок"); СписокЗначений1.Добавить("Игорь Иванович Печкин - почтальон, работающий в простоквашинском почтовом отделении.", "почтальон Печкин"); СписокЗначений1.Добавить("Вера Павловна - сестра Дяди Фёдора.", "Вера Павловна"); СписокЗначений1.Добавить("Тама-Тама - грызун неизвестной породы, изобретатель, художник.", "Тама-Тама"); СписокЗначений1.Добавить("Маргарита Егоровна (Мегеровна) - няня, нанятая родителями.", "Маргарита Егоровна"); СписокЗначений1.Добавить("Мама - мать Дяди Фёдора и Веры Павловны. Добрая, любящая. Хорошая хозяйка.", "Мама"); СписокЗначений1.Добавить("Папа - отец Дяди Фёдора и Веры Павловны. Добродушный, справедливый, с отличным чувством юмора.", "Папа"); СписокЗначений1.Добавить(3.14, "Число Пи"); СписокЗначений1.Добавить(ТФ, "ТерминалФормыДляОдноСкрипта"); ПолеВыбора1.ИндексВыбранного = 1; ПолеВыбора1.Свернуть(); ПолеВыбора1.Икс = ТФ.Позиция.Абсолютно(1); ПолеВыбора1.Игрек = ТФ.Позиция.Абсолютно(14); ПолеВыбора1.ПриОткрытииВыбранного = ТФ.Действие(ЭтотОбъект, "ПолеВыбора1_ПриОткрытииВыбранного"); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Перем ТФ, ПолеВыбора1, ПриОткрытииВыбранного; Процедура ПриОткрытии() Экспорт ТФ.Верхний.Текст = "Выберите и кликните элемент в поле выбора."; ПолеВыбора1.УстановитьФокус(); ПолеВыбора1.Развернуть(); Если ТФ.ПлатформаWin Тогда ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик", 2000); КонецЕсли; КонецПроцедуры Процедура ТаймерТик() Экспорт ТФ.ОтправитьКлавишуКонсоли(ТФ.КлавишиКонсоли.Enter); КонецПроцедуры Процедура ПолеВыбора1_ПриОткрытииВыбранного() Экспорт АргументыСобытия = ТФ.АргументыСобытия; ЭлементСпискаЗначений = АргументыСобытия.Значение; ТФ.Верхний.Текст = "Выберите и кликните элемент в поле выбора. |ПолеВыбора1_ПриОткрытииВыбранного = " + ТекущаяУниверсальнаяДатаВМиллисекундах() + " |Отправитель = " + АргументыСобытия.Отправитель + " |ИндексВыбранного = " + АргументыСобытия.ИндексВыбранного + " |Значение = " + ЭлементСпискаЗначений.Значение + " |Представление = " + ЭлементСпискаЗначений.Представление + " |"; ПриОткрытииВыбранного = Истина; ТФ.Завершить(); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); ПолеВыбора1 = ТФ.Верхний.Добавить(ТФ.ПолеВыбора(0, 0)); ПолеВыбора1.ЦветоваяСхема = ТФ.Цвета.Основа; СписокЗначений1 = ПолеВыбора1.Источник; СписокЗначений1.Добавить("Дядя Фёдор - мальчик, у которого прозвище ""Дядя"".", "Дядя Фёдор"); СписокЗначений1.Добавить("Матроскин - кот, хозяйственный, имеет коров и собственное хозяйство.", "Матроскин"); СписокЗначений1.Добавить("Шарик - пёс, добрый, весёлый, простой, любит современные вещи.", "Шарик"); СписокЗначений1.Добавить("Галчонок. Очень хитрый, любит воровать еду пока никто не видит.", "Галчонок"); СписокЗначений1.Добавить("Игорь Иванович Печкин - почтальон, работающий в простоквашинском почтовом отделении.", "почтальон Печкин"); СписокЗначений1.Добавить("Вера Павловна - сестра Дяди Фёдора.", "Вера Павловна"); СписокЗначений1.Добавить("Тама-Тама - грызун неизвестной породы, изобретатель, художник.", "Тама-Тама"); СписокЗначений1.Добавить("Маргарита Егоровна (Мегеровна) - няня, нанятая родителями.", "Маргарита Егоровна"); СписокЗначений1.Добавить("Мама - мать Дяди Фёдора и Веры Павловны. Добрая, любящая. Хорошая хозяйка.", "Мама"); СписокЗначений1.Добавить("Папа - отец Дяди Фёдора и Веры Павловны. Добродушный, справедливый, с отличным чувством юмора.", "Папа"); СписокЗначений1.Добавить(3.14, "Число Пи"); СписокЗначений1.Добавить(ТФ, "ТерминалФормыДляОдноСкрипта"); ПолеВыбора1.ИндексВыбранного = 1; ПолеВыбора1.Свернуть(); ПолеВыбора1.Икс = ТФ.Позиция.Абсолютно(1); ПолеВыбора1.Игрек = ТФ.Позиция.Абсолютно(14); ПолеВыбора1.ПриОткрытииВыбранного = ТФ.Действие(ЭтотОбъект, "ПолеВыбора1_ПриОткрытииВыбранного"); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск(); Сообщить(?( ПриОткрытииВыбранного , "", "!!! ") + "ПолеВыбора.ПриОткрытииВыбранного (ComboBox.OpenSelectedItem) Событие" + " " + ТекущаяДата() + Символы.ПС);