8.х Обработчик событий

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем AK79, 5 фев 2008.

0/5, Голосов: 0
  1. TopicStarter Overlay
    AK79
    Offline

    AK79

    Регистрация:
    23 дек 2007
    Сообщения:
    27
    Симпатии:
    0
    Баллы:
    1
    В форме генерирую ТабличноеПоле НовТаб. Создаю колоку колво.
    Мне необходимо описать событие ПриИзменении для данной колонки Колво.
    Помогите, срочно нужно дописать форму!
    AK79, 5 фев 2008
    #1
  2. BabySG
    Offline

    BabySG Администраторы Команда форума Администратор

    Регистрация:
    10 июн 2007
    Сообщения:
    11.853
    Симпатии:
    18
    Баллы:
    29
    Дык а в чем сложность? Правой клавишей на оле ввода в этой колонке-свойства-ПриИзменении
    BabySG, 5 фев 2008
    #2
  3. TopicStarter Overlay
    AK79
    Offline

    AK79

    Регистрация:
    23 дек 2007
    Сообщения:
    27
    Симпатии:
    0
    Баллы:
    1
    Сложность в том что ТП я создаю динамически в нутри кода....
    AK79, 5 фев 2008
    #3
  4. BabySG
    Offline

    BabySG Администраторы Команда форума Администратор

    Регистрация:
    10 июн 2007
    Сообщения:
    11.853
    Симпатии:
    18
    Баллы:
    29
    BabySG, 5 фев 2008
    #4
  5. MetalMessia
    Offline

    MetalMessia

    Регистрация:
    27 дек 2007
    Сообщения:
    25
    Симпатии:
    0
    Баллы:
    1
    Код:
    Процедура Обработчик()

КонецПроцедуры

////////////////////////////////////////////////////////////////////
// Основная программа
/////////////////////////////////////////////////////////////////////

ЭлементыФормы.ТП.Колонки.Добавить("Количество");
ЭлементыФормы.ТП.Колонки.Найти("Количество").РежимРедактирования =
ЭлементыФормы.ТП.Колонки.Найти("Количество").ЭлементУправления.УстановитьДействие("ПриИзменении",
Новый Действие("Обработчик"));
    MetalMessia, 6 фев 2008
    #5
  6. TopicStarter Overlay
    AK79
    Offline

    AK79

    Регистрация:
    23 дек 2007
    Сообщения:
    27
    Симпатии:
    0
    Баллы:
    1
    Не получилось ....
    {Документ.Заказ.Форма.ФормаДокумента(92)}: Обращение к процедуре объекта как к функции (УстановитьДействие)
    ЭлементыФормы.ТабличноеПоле1.Колонки.Найти("Колво").РежимРедактирования = ЭлементыФормы.ТабличноеПоле1.Колонки.Найти("Колво").ЭлементУправления.УстановитьДействие("ПриИзменении",Новый Действие("ПриИзмененииКолонкиТабличногоПоля"));
    AK79, 7 фев 2008
    #6
  7. BabySG
    Offline

    BabySG Администраторы Команда форума Администратор

    Регистрация:
    10 июн 2007
    Сообщения:
    11.853
    Симпатии:
    18
    Баллы:
    29
    Странный пример привел MetalMessia - это процедура - и не может ничего вернуть, собственно, о чем и ошибка.

    напиши просто:
    Код:
    ЭлементыФормы.ТП.Колонки.Найти("Количество").ЭлементУправления.УстановитьДействие("ПриИзменении",
Новый Действие("Обработчик"));
    BabySG, 7 фев 2008
    #7
  8. TopicStarter Overlay
    AK79
    Offline

    AK79

    Регистрация:
    23 дек 2007
    Сообщения:
    27
    Симпатии:
    0
    Баллы:
    1
    1С переварила, но обработчик не ловик событие.....
    Процедура ПриИзмененииКолонкиТабличногоПоля(Элемент)
    т=1;

    КонецПроцедуры
    AK79, 7 фев 2008
    #8
  9. BabySG
    Offline

    BabySG Администраторы Команда форума Администратор

    Регистрация:
    10 июн 2007
    Сообщения:
    11.853
    Симпатии:
    18
    Баллы:
    29
    Покажи код.
    У меня вот такая строка:
    Код:
    ЭлементыФормы.Товары.Колонки.Номенклатура.ЭлементУправления.УстановитьДействие(
"ПриИзменении", Новый Действие("МоеДействие"));
    заработала без проблем.
    BabySG, 7 фев 2008
    #9
  10. TopicStarter Overlay
    AK79
    Offline

    AK79

    Регистрация:
    23 дек 2007
    Сообщения:
    27
    Симпатии:
    0
    Баллы:
    1
    Код:
    Процедура СоздатьСтраницу(НазваниеСтраницы);
ТекПанель = ЭлементыФормы.Панель1;
СтрИмя = УдалитьЗапрешенныеСимволы(НазваниеСтраницы);

Если ТекПанель.Страницы[0].Заголовок = ""  тогда
ТекПанель.Страницы[0].Заголовок = НазваниеСтраницы;
НовТаб = ЭлементыФормы.Добавить(Тип("ТабличноеПоле"), СтрИмя,Истина,ТекПанель);
НовТаб.Верх = 30;
НовТаб.Лево = 6;
НовТаб.Ширина = ТекПанель.Ширина - 14;
НовТаб.Высота = ТекПанель.Высота - 56;
НовТаб.УстановитьПривязку(ГраницаЭлементаУправления.Верх,        
ТекПанель,        ГраницаЭлементаУправления.Верх);
НовТаб.УстановитьПривязку(ГраницаЭлементаУправления.Низ,        
ТекПанель,        ГраницаЭлементаУправления.Низ);
НовТаб.УстановитьПривязку(ГраницаЭлементаУправления.Право,        
ТекПанель,        ГраницаЭлементаУправления.Право);

НовТаб.Колонки.Добавить("N");
НовТаб.Колонки.Добавить("Номенклатура");
НовТаб.Колонки.Добавить("Колво");
НовТаб.Колонки.Добавить("Цена");
НовТаб.Колонки.Добавить("Сумма");
НовТаб.Подвал = Истина;
НовТаб.ИзменятьНастройкуКолонок = Ложь; 
НовТаб.ЧередованиеЦветовСтрок = Истина;

ЭлементыФормы.БОНДЕЛИС.Колонки.Колво.ЭлементУправления.УстановитьДействие(
"ПриИзменении",Новый Действие("ПриИзмененииКолонкиТабличногоПоля"));
//НовТаб.Колонки.Найти("Колво").РежимРедактирования = 
//                              НовТаб.Колонки.Найти("Колво").ЭлементУправления.УстановитьДействие(
//                              "ПриИзменении",Новый Действие("ПриИзмененииКолонкиТабличногоПоля"));

//НовоеДействие = Новый Действие(СтрИмя + "Колво" + "ПриИзменении");
//ЭтаФорма.ЭлементыФормы[НовТаб].УстановитьДействие("ПриИзменении", НовоеДействие);
//Элементыформы.Корейскиесалаты.Колонки[2].ЭлементУправления.УстановитьДействие(
"ПриИзменении", НовоеДействие);
Иначе
ТекСтр = ТекПанель.Страницы.Добавить();
ТекСтр.Заголовок = НазваниеСтраницы;
ТекПанель.ТекущаяСтраница = ТекСтр;

НовТаб = ЭлементыФормы.Добавить(Тип("ТабличноеПоле"), СтрИмя,Истина,ТекПанель);
НовТаб.Верх = 30;
НовТаб.Лево = 6;
НовТаб.Ширина = ТекПанель.Ширина - 14;
НовТаб.Высота = ТекПанель.Высота - 56;
НовТаб.УстановитьПривязку(ГраницаЭлементаУправления.Верх,        
ТекПанель,        ГраницаЭлементаУправления.Верх);
НовТаб.УстановитьПривязку(ГраницаЭлементаУправления.Низ,        
ТекПанель,        ГраницаЭлементаУправления.Низ);
НовТаб.УстановитьПривязку(ГраницаЭлементаУправления.Право,        
ТекПанель,        ГраницаЭлементаУправления.Право);

НовТаб.Колонки.Добавить("N");
НовТаб.Колонки.Добавить("Номенклатура");
НовТаб.Колонки.Добавить("Колво");
НовТаб.Колонки.Добавить("Цена");
НовТаб.Колонки.Добавить("Сумма");
НовТаб.Подвал = Истина;
НовТаб.ИзменятьНастройкуКолонок = Ложь;
НовТаб.ЧередованиеЦветовСтрок = Истина;


КонецЕсли;
КонецПроцедуры   

Процедура ПриИзмененииКолонкиТабличногоПоля(Элемент)
т=1;
КонецПроцедуры
    AK79, 7 фев 2008
    #10
  11. BabySG
    Offline

    BabySG Администраторы Команда форума Администратор

    Регистрация:
    10 июн 2007
    Сообщения:
    11.853
    Симпатии:
    18
    Баллы:
    29
    Выстави тип поля, судя по всему из-за этого...
    BabySG, 8 фев 2008
    #11
Похожие темы
  1. sn.delui

    8.х Мониторинг API событий из 1С

    sn.delui, 6 апр 2010, в разделе: Конфигурирование на платформе "1С:Предприятие 8"
    Ответов:
    14
    Просмотров:
    2.395
    sn.delui
    8 апр 2010
  2. Dimka77

    8.х ОБМЕН Помогите настроить обработчик событий конвертации.

    Dimka77, 28 апр 2010, в разделе: Обмен данными в "1С:Предприятие 8"
    Ответов:
    10
    Просмотров:
    6.871
    Саша82
    31 июл 2010
  3. Dimka77

    8.х ОБМЕН Ещё один обработчик событий конвертации.

    Dimka77, 28 апр 2010, в разделе: Обмен данными в "1С:Предприятие 8"
    Ответов:
    12
    Просмотров:
    1.199
    Dimka77
    29 апр 2010
Загрузка...