Пн, 09.02.2026, 06:18:35
Главная Регистрация RSS
Приветствую Вас, Гость
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Пожелания по шаблонам кода
alexgremburgДата: Пт, 28.08.2015, 11:02:39 | Сообщение # 1
Майор
Группа: Проверенные
Сообщений: 93
Репутация: 34
Статус: Оффлайн
Пытался пользоваться шаблонами кода, но многие шаблоны на находились, поэтому предлагаю изменить поиск шаблона в таблице так (Обработка ирКлсПолеТекстовогоДокументаСКонтекстнойПодсказкой, Модуль объекта (3590)):
        
Код
//Было:
          //СтрокаШаблона = ТаблицаШаблоновТекста.Найти(НРег(НачалоКонтекста), "Шаблон");
          //Стало:
          СтрокаШаблона=Неопределено;
          Для каждого ТекСтрокаШаблона Из ТаблицаШаблоновТекста Цикл
              Если Найти(ТекСтрокаШаблона.Шаблон, НРег(НачалоКонтекста))>0 Тогда
                  СтрокаШаблона = ТекСтрокаШаблона;
                  Прервать;
              КонецЕсли;
              ШаблонБезСкобок = СтрЗаменить(ТекСтрокаШаблона.Шаблон, "[", "");
              ШаблонБезСкобок = СтрЗаменить(ШаблонБезСкобок, "]", "");
              Если Найти(ШаблонБезСкобок, НРег(НачалоКонтекста))>0 Тогда
                  СтрокаШаблона = ТекСтрокаШаблона;
                  Прервать;
              КонецЕсли;
          КонецЦикла;


Сообщение отредактировал alexgremburg - Пт, 28.08.2015, 11:02:56
 
tormozitДата: Пт, 28.08.2015, 11:54:28 | Сообщение # 2
Генералиссимус
Группа: Администраторы
Сообщений: 7310
Репутация: 193
Статус: Оффлайн
Нужно указать какие именно шаблоны не находились. Вслепую вносить изменение не хотелось бы. Поэтому желательно описать способ воспроизведения проблемы. По всей видимости для этого нужно будет предоставить файл шаблонов.
 
alexgremburgДата: Сб, 29.08.2015, 00:55:42 | Сообщение # 3
Майор
Группа: Проверенные
Сообщений: 93
Репутация: 34
Статус: Оффлайн
Нет проблем! Используемый шаблон приложил. Для пример не работают шаблоны "ДляП[о]", "ДляК[аждог]о" и т.п.
Прикрепления: Development.st (89.3 Kb)


Сообщение отредактировал alexgremburg - Сб, 29.08.2015, 01:05:20
 
tormozitДата: Пн, 31.08.2015, 00:40:29 | Сообщение # 4
Генералиссимус
Группа: Администраторы
Сообщений: 7310
Репутация: 193
Статус: Оффлайн
Спасибо. Исправлено в 3.41
 
alexgremburgДата: Ср, 20.04.2016, 11:03:02 | Сообщение # 5
Майор
Группа: Проверенные
Сообщений: 93
Репутация: 34
Статус: Оффлайн
В версии 3.59 вновь не работает.
 
tormozitДата: Ср, 20.04.2016, 11:06:33 | Сообщение # 6
Генералиссимус
Группа: Администраторы
Сообщений: 7310
Репутация: 193
Статус: Оффлайн
В какой максимальной версии это работало? Думаю что проблема не в изменении подсистемы, т.к. этот функционал с тех пор с большой вероятностью не менялся.
 
alexgremburgДата: Ср, 20.04.2016, 11:18:15 | Сообщение # 7
Майор
Группа: Проверенные
Сообщений: 93
Репутация: 34
Статус: Оффлайн
В 3.57 вроде работало.
Не работает из-за того, что почему то закомментированы строки поиска текста. Они заменены на строки сравнения

Код
Для каждого ТекСтрокаШаблона Из ТаблицаШаблоновТекста Цикл
            //Если Найти(ТекСтрокаШаблона.Шаблон, НРег(НачалоКонтекста)) > 0 Тогда
            Если ТекСтрокаШаблона.Шаблон = НРег(НачалоКонтекста) Тогда
            ...
            //Если Найти(ШаблонБезСкобок, НРег(НачалоКонтекста)) > 0 Тогда
            Если ШаблонБезСкобок = НРег(НачалоКонтекста) Тогда
            ...
КонецЦикла;
 
tormozitДата: Ср, 20.04.2016, 11:44:50 | Сообщение # 8
Генералиссимус
Группа: Администраторы
Сообщений: 7310
Репутация: 193
Статус: Оффлайн
Работать могло только если ты модифицировал код. В оригинальной подсистеме это не работало всегда (во всех версиях). Будет исправлено в следующей версии.
 
alexgremburgДата: Ср, 20.04.2016, 11:56:11 | Сообщение # 9
Майор
Группа: Проверенные
Сообщений: 93
Репутация: 34
Статус: Оффлайн
А сообщение

Цитата
Спасибо. Исправлено в 3.41

не считается? Кто-то ведь добавил в подсистему строки с перебором всех строк таблицы
Ладно, это не суть. Главное, чтобы работало


Сообщение отредактировал alexgremburg - Ср, 20.04.2016, 11:57:51
 
tormozitДата: Ср, 20.04.2016, 12:17:35 | Сообщение # 10
Генералиссимус
Группа: Администраторы
Сообщений: 7310
Репутация: 193
Статус: Оффлайн
В 3.41 я внес исправление, но оно не привело к полностью корректному поведению.
 
tormozitДата: Пн, 25.04.2016, 00:11:48 | Сообщение # 11
Генералиссимус
Группа: Администраторы
Сообщений: 7310
Репутация: 193
Статус: Оффлайн
Исправлено в 3.60
 
  • Страница 1 из 1
  • 1
Поиск: