- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
- 11
ДляВырезки = 8;
Если Не Найти(Стр,"маг") = 0 Тогда
Если (Найти(Стр,"маг") + ДляВырезки) > СтрДлина(Стр) Тогда
Обрез = Сред(Стр,Найти(Стр,"Маг"),(Найти(Стр,"Маг") - СтрДлина(Стр)) + 1);
Иначе
Обрез = Сред(Стр,Найти(Стр,"маг"),ДляВырезки);
КонецЕсли;
КонецЕсли;
Возврат ВторойУровеньСумрака(Обрез);
Комментарии (8) RSS