Чтение и запись.
Тип: Действие (Action).
Возвращает или задает код для события при нажатии на вкладку. Может использоваться для отмены навигации, отображения контекстного меню (например, при щелчке правой кнопкой мыши) и т. д.
Вкладка (Tab) |
Возвращает вкладку по которой кликнули мышью. |
Игрек (Y) |
Возвращает координату Y для события мыши. |
Икс (X) |
Возвращает координату X для события мыши. |
Отправитель (Sender) |
Возвращает источник (объект) последнего события. |
Параметр (Parameter) |
Возвращает объект, заданный при установке обработчика события, для передачи в обработчик события. |
ФлагиМыши (Flags) |
Возвращает флаги мыши для события мыши. |
ПанельВкладок1.ВкладкаНажата = ТФ.Действие(ЭтотОбъект, "ПанельВкладок1_ВкладкаНажата");
Перем ТФ, ПанельВкладок1, АргументыСобытия; Процедура ПриОткрытии() Экспорт ТФ.ОтправитьКлавишуКонсоли(ТФ.КлавишиКонсоли.Enter); КонецПроцедуры Процедура ПанельВкладок1_ВкладкаНажата() Экспорт АргументыСобытия = ТФ.АргументыСобытия; Текст = "ПанельВкладок1_ВкладкаНажата |Отправитель = " + АргументыСобытия.Отправитель + " |Параметр = " + АргументыСобытия.Параметр + " |Вкладка = " + АргументыСобытия.Вкладка.Текст + " |Игрек = " + АргументыСобытия.Игрек + " |Икс = " + АргументыСобытия.Икс + " |ФлагиМыши = " + АргументыСобытия.ФлагиМыши + " |"; ТФ.Уведомление().Показать(Текст, -1); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); ТФ.Верхний.Текст = "Переключайте вкладки"; ПанельВкладок1 = ТФ.Верхний.Добавить(ТФ.ПанельВкладок(, 3, 50, 15)); Верхний1 = ТФ.Верхний(); Окно2 = Верхний1.Добавить(ТФ.Окно("Окно2")); Окно2.Заполнить(); Вкладка1 = ТФ.Вкладка(); Вкладка1.Текст = "Вкладка1"; Вкладка1.Элемент = Верхний1; Кнопка1 = ТФ.Кнопка("Кнопка1"); Вкладка2 = ТФ.Вкладка("Вкладка2", Кнопка1); ПанельВкладок1.ДобавитьВкладку(Вкладка1, Истина); ПанельВкладок1.ДобавитьВкладку(Вкладка2, Ложь); ПанельВкладок1.ВкладкаНажата = ТФ.Действие(ЭтотОбъект, "ПанельВкладок1_ВкладкаНажата"); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Перем ТФ, ПанельВкладок1, АргументыСобытия; Процедура ПриОткрытии() Экспорт ТФ.ОтправитьКлавишуКонсоли(ТФ.КлавишиКонсоли.Enter); КонецПроцедуры Процедура ПанельВкладок1_ВкладкаНажата() Экспорт АргументыСобытия = ТФ.АргументыСобытия; Текст = "ПанельВкладок1_ВкладкаНажата |Отправитель = " + АргументыСобытия.Отправитель + " |Параметр = " + АргументыСобытия.Параметр + " |Вкладка = " + АргументыСобытия.Вкладка.Текст + " |Игрек = " + АргументыСобытия.Игрек + " |Икс = " + АргументыСобытия.Икс + " |ФлагиМыши = " + АргументыСобытия.ФлагиМыши + " |"; ТФ.Уведомление().Показать(Текст, -1); ТФ.Завершить(); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); ТФ.Верхний.Текст = "Переключайте вкладки"; ПанельВкладок1 = ТФ.Верхний.Добавить(ТФ.ПанельВкладок(, 3, 50, 15)); Верхний1 = ТФ.Верхний(); Окно2 = Верхний1.Добавить(ТФ.Окно("Окно2")); Окно2.Заполнить(); Вкладка1 = ТФ.Вкладка(); Вкладка1.Текст = "Вкладка1"; Вкладка1.Элемент = Верхний1; Кнопка1 = ТФ.Кнопка("Кнопка1"); Вкладка2 = ТФ.Вкладка("Вкладка2", Кнопка1); ПанельВкладок1.ДобавитьВкладку(Вкладка1, Истина); ПанельВкладок1.ДобавитьВкладку(Вкладка2, Ложь); ПанельВкладок1.ВкладкаНажата = ТФ.Действие(ЭтотОбъект, "ПанельВкладок1_ВкладкаНажата"); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск(); Сообщить(?( ТипЗнч(АргументыСобытия.Вкладка) = Тип("ТфВкладка") , "", "!!! ") + "ПанельВкладок.ВкладкаНажата (TabView.TabClicked) Событие" + " " + ТекущаяДата() + Символы.ПС);