Чтение и запись.
Тип: Действие (Action).
Возвращает или задает код для события раскрытия списка.
Отправитель (Sender) |
Возвращает источник (объект) последнего события. |
Параметр (Parameter) |
Возвращает объект, заданный при установке обработчика события, для передачи в обработчик события. |
ПолеВыбора1.ПриРаскрытии = ТФ.Действие(ЭтотОбъект, "ПолеВыбора1_ПриРаскрытии");
Перем ТФ, ПолеВыбора1; Процедура ПриОткрытии() Экспорт ТФ.Верхний.Текст = "Разверните поле выбора."; ПолеВыбора1.УстановитьФокус(); ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик"); КонецПроцедуры Процедура ТаймерТик() Экспорт ПолеВыбора1.Развернуть(); КонецПроцедуры Процедура ПолеВыбора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.Развернуть(); КонецПроцедуры Процедура ПолеВыбора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.Expanded) Событие" + " " + ТекущаяДата() + Символы.ПС);