- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
ДляВырезки = 8;
Если Не Найти(Стр,"маг") = 0 Тогда
Если (Найти(Стр,"маг") + ДляВырезки) > СтрДлина(Стр) Тогда
Обрез = Сред(Стр,Найти(Стр,"Маг"),(Найти(Стр,"Маг") - СтрДлина(Стр)) + 1);
Иначе
Обрез = Сред(Стр,Найти(Стр,"маг"),ДляВырезки);
КонецЕсли;
КонецЕсли;
Возврат ВторойУровеньСумрака(Обрез);
Комментарии (8) RSS
Добавить комментарий