Как посчитать количество символов в тексте в 1С: все способы с примерами кода

Подсчет символов в тексте — одна из самых частых задач при работе с 1С:Предприятие. Без этого не обойтись при формировании отчетов с ограничением по длине, валидации полей, интеграции с внешними системами или даже банальной проверке корректности введенных данных. Казалось бы, что может быть проще? Но в 1С есть свои нюансы: здесь важно учитывать кодировку, тип данных, а иногда и особенности конкретной конфигурации.

Многие пользователи ошибочно думают, что достаточно нажать СтрДлина() — и готово. На практике же этот метод работает только с примитивными строками, а вот с полями документов, табличными частями или HTML-текстами из отчетов придется повозиться. В этой статье разберем 5 рабочих способов подсчета символов — от базовых до продвинутых, с примерами кода и пояснениями, когда какой метод применять.

Особое внимание уделим распространенным ошибкам, из-за которых подсчет дает неверный результат. Например, почему СтрДлина() может вернуть число на 30% больше реального количества символов в тексте с переносами строк. Или как правильно считать символы в PDF-документах, сформированных через 1С:Печать. Все эти случаи разобраны ниже с практическими рекомендациями.

1. Базовый метод: функция СтрДлина()

Самый простой и очевидный способ — использовать встроенную функцию СтрДлина(). Она возвращает количество символов в строковом значении, включая пробелы и знаки препинания. Пример вызова:

КоличествоСимволов = СтрДлина("Пример текста для подсчета");

На первый взгляд, все элементарно. Но есть три подводных камня, о которых многие забывают:

• 🔹 Кодировка matters. В UTF-8 один символ может занимать до 4 байт (например, эмодзи или китайские иероглифы). СтрДлина() считает логические символы, а не байты — это важно для интеграций.
• 🔹 Переносы строк. Символы \r и \n учитываются как отдельные символы. Если в тексте много абзацев, результат может сильно отличаться от ожидаемого.
• 🔹 NULL-значения. Если передать в функцию Неопределено или NULL, получите ошибку. Всегда проверяйте входные данные.

Пример с обработкой NULL и переносов:

Функция БезопасныйПодсчетСимволов(Текст)
Если Текст = Неопределено Тогда
Возврат 0;
КонецЕсли;
// Заменяем все виды переносов на один символ для единообразия
Текст = СтрЗаменить(Текст, Символы.ПС, " ");
Текст = СтрЗаменить(Текст, Символы.ВК, " ");
Возврат СтрДлина(Текст);
КонецФункции

⚠️ Внимание: В конфигурациях с включенным режимом совместимости 1С:Предприятие 8.2 функция СтрДлина() может некорректно обрабатывать символы вне BMP (например, редкие математические знаки). В таких случаях используйте альтернативные методы из следующих разделов.

2. Подсчет символов в полях документов и справочников

Когда нужно посчитать символы не в произвольной строке, а в поле объекта метаданных (например, в комментарии к документу или наименовании справочника), подход меняется. Здесь важно учитывать тип поля:

• 📝 Строка: используйте СтрДлина(Объект.Поле) напрямую.
• 📄 Текстовый документ (тип ХранилищеЗначения): сначала получите текстовое представление через ПолучитьТекст().
• 🗃️ Табличная часть: пройдитесь циклом по строкам и суммируйте длины.

Пример для текстового документа (например, поле Описание в справочнике Номенклатура):

ТекстОписания = ДокументОбъект.Описание.ПолучитьТекст();
КоличествоСимволов = СтрДлина(ТекстОписания);

Для табличных частей (например, подсчет символов во всех строках колонки Примечание):

СуммаСимволов = 0;
Для Каждого СтрокаТабличнойЧасти Из ДокументОбъект.Товары Цикл
СуммаСимволов = СуммаСимволов + СтрДлина(СтрокаТабличнойЧасти.Примечание);
КонецЦикла;

Проверить тип поля (строка/текстовый документ/табличная часть)

Учесть кодировку базы данных (UTF-8 или Windows-1251)

Обработать возможные NULL-значения

Преобразовать текстовые документы в строки через ПолучитьТекст()

-->

Если работаете с регламентированными отчетами (например, Счет-фактура), где текст формируется через механизм 1С:Печать, используйте следующий подход:

Макет = ДокументОбъект.ПечатнаяФорма();
ТекстДляПодсчета = Макет.ПолучитьТекст();
КоличествоСимволов = СтрДлина(ТекстДляПодсчета);

3. Учет пробелов и непечатаемых символов

Часто требуется посчитать только видимые символы, исключив пробелы, табуляции или служебные знаки. Для этого используйте комбинацию функций СтрЗаменить() и СтрДлина():

Функция ПодсчетВидимыхСимволов(Текст)
Если Текст = Неопределено Тогда
Возврат 0;
КонецЕсли;
// Удаляем все пробелы, табуляции и неразрывные пробелы
ТекстБезПробелов = СтрЗаменить(Текст, " ", "");
ТекстБезПробелов = СтрЗаменить(ТекстБезПробелов, Символы.Таб, "");
ТекстБезПробелов = СтрЗаменить(ТекстБезПробелов, Символы.НБП, "");
Возврат СтрДлина(ТекстБезПробелов);
КонецФункции

Для более тонкой настройки (например, оставить пробелы между словами, но убрать лишние) используйте регулярные выражения:

Текст = "   Пример   текста  с   лишними   пробелами   ";
Регулярка = Новый РегулярноеВыражение("\s+");
ТекстНормализованный = Регулярка.Заменить(Текст, " ");
КоличествоСимволов = СтрДлина(ТекстНормализованный); // 30 (вместо 42)

⚠️ Внимание: При работе с текстами, импортированными из Microsoft Word или Excel, в строке могут содержаться непечатаемые символы форматирования (например, U+2028 — разделитель строк). Их тоже учитывает СтрДлина(), но они не видны при просмотре. Для очистки используйте:

Текст = СтрЗаменить(Текст, Символ(8232), ""); // Удаляем U+2028
Текст = СтрЗаменить(Текст, Символ(8233), ""); // Удаляем U+2029

4. Подсчет символов в HTML и форматированном тексте

Если текст содержит HTML-разметку (например, из поля ОписаниеТовара с жирным шрифтом или ссылками), прямая функция СтрДлина() посчитает и теги. Чтобы получить длину только видимого текста, используйте следующий алгоритм:

Функция ПодсчетСимволовБезHTML(HTMLТекст)
Если HTMLТекст = Неопределено Тогда
Возврат 0;
КонецЕсли;
// Удаляем все HTML-теги
Регулярка = Новый РегулярноеВыражение("<[^>]+>");
ТекстБезТегов = Регулярка.Заменить(HTMLТекст, "");
// Удаляем лишние пробелы и переносы
ТекстБезТегов = СтрЗаменить(ТекстБезТегов, Символы.ПС, " ");
ТекстБезТегов = СтрЗаменить(ТекстБезТегов, Символы.ВК, " ");
Возврат СтрДлина(ТекстБезТегов);
КонецФункции

Для текстов с RTF-разметкой (например, в полях типа ФорматированныйДокумент) подход аналогичный, но регулярное выражение будет сложнее:

Регулярка = Новый РегулярноеВыражение("\{\\\[^{}]+\}"); // Удаляем RTF-теги

Критичный нюанс: при работе с HTML из 1С:Предприятие 8.3.20+ учитывайте, что встроенный механизм 1С:Печать может добавлять служебные символы в начале и конце строки (например, U+FEFF — метка порядка байтов). Их нужно удалять перед подсчетом:

Текст = СтрЗаменить(Текст, Символ(65279), ""); // Удаляем BOM

5. Программный подсчет с учетом кодировки (UTF-8)

Когда текст содержит многобайтовые символы (кириллица, иероглифы, эмодзи), стандартная СтрДлина() может давать неточные результаты при интеграции с внешними системами, где важно количество байт, а не символов. Для таких случаев используйте следующий код:

Функция ПодсчетБайтВUTF8(Текст)
Если Текст = Неопределено Тогда
Возврат 0;
КонецЕсли;
// Преобразуем строку в двоичные данные в кодировке UTF-8
ДвоичныеДанные = Новый ДвоичныеДанные(Текст, КодировкаТекста.UTF8);
Возврат ДвоичныеДанные.Размер();
КонецФункции

Пример разницы для строки с эмодзи:

Текст = "Привет! 😊";
Сообщить("Символов: " + СтрДлина(Текст)); // 9
Сообщить("Байт в UTF-8: " + ПодсчетБайтВUTF8(Текст)); // 13

Для обратной задачи (получение количества символов из байтового размера) используйте приблизительный расчет:

ПримерныйКоличествоСимволов = РазмерВБайтах / 1.5; // Коэффициент для смешанного текста (латиница + кириллица)

⚠️ Внимание: В конфигурациях с включенной поддержкой 1С:Линк или при обмене данными через REST API всегда уточняйте требуемую кодировку на стороне получателя. Некоторые системы (например, Битрикс24) ожидают размер в байтах, а не в символах.

6. Автоматизация подсчета в отчетах и обработках

Если подсчет символов нужен регулярно (например, для проверки длины комментариев в документах), целесообразно создать универсальную функцию и добавить ее в общий модуль. Пример реализации:

// ОбщийМодуль.РаботаСТекстом
Функция ПодсчетСимволов(Значение, УчитыватьПробелы = Истина, УдалятьHTML = Ложь) Экспорт
Если Значение = Неопределено Тогда
Возврат 0;
КонецЕсли;

Текст = ?(ТипЗнч(Значение) = Тип("ХранилищеЗначения"), Значение.ПолучитьТекст(), Значение);

Если УдалятьHTML Тогда
Регулярка = Новый РегулярноеВыражение("<[^>]+>");
Текст = Регулярка.Заменить(Текст, "");
КонецЕсли;

Если НЕ УчитыватьПробелы Тогда
Текст = СтрЗаменить(Текст, " ", "");
Текст = СтрЗаменить(Текст, Символы.Таб, "");
КонецЕсли;

Возврат СтрДлина(Текст);
КонецФункции

Теперь в любом месте конфигурации можно вызывать:

Количество = РаботаСТекстом.ПодсчетСимволов(ДокументОбъект.Комментарий, Ложь, Истина);

Для добавления подсчета в отчеты (например, в Акт выполненных работ) создайте вычисляемое поле:

1. Откройте схему компоновки данных.
2. Добавьте новый ресурс с выражением:

   Выразить(СтрДлина(Объект.Описание) Как Число)

3. Настройте отображение поля в макете.

Процедура СписокПриОтображенииСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)
ДанныеСтроки.Вставить("ДлинаОписания", СтрДлина(ДанныеСтроки.Описание));
КонецПроцедуры

7. Распространенные ошибки и их решения

Даже опытные разработчики иногда сталкиваются с неожиданными результатами при подсчете символов. Вот TOP-5 ошибок и как их избежать:

• 🚫 Игнорирование NULL. Всегда проверяйте входной параметр на Неопределено, иначе получите ошибку выполнения.
• 🚫 Кэширование результатов. Если текст меняется динамически (например, в обработке ввода), не кэшируйте результат СтрДлина() — пересчитывайте при каждом изменении.
• 🚫 Неучет переносов. В текстах с абзацами \r\n считается как 2 символа. Для единообразия заменяйте их на \n.
• 🚫 Проблемы с кодировкой. В базах с Windows-1251 кириллические символы занимают 1 байт, а в UTF-8 — 2 байта. Уточняйте кодировку базы через КодировкаСтрокБазыДанных().
• 🚫 HTML/RTF без очистки. Забыв удалить теги, вы получите завышенный результат на 20-50%.

Пример обработки всех типичных случаев:

Функция УниверсальныйПодсчетСимволов(Значение)
Если Значение = Неопределено Тогда
Возврат 0;
КонецЕсли;

// Приводим к строковому типу
Текст = ?(ТипЗнч(Значение) = Тип("ХранилищеЗначения"), Значение.ПолучитьТекст(),
?(ТипЗнч(Значение) = Тип("ДвоичныеДанные"), Значение.ПолучитьСтроку(),
Строка(Значение)));

// Очищаем от HTML/RTF
РегуляркаHTML = Новый РегулярноеВыражение("<[^>]+>");
Текст = РегуляркаHTML.Заменить(Текст, "");

// Нормализуем переносы и пробелы
Текст = СтрЗаменить(Текст, Символы.ПС, "\n");
Текст = СтрЗаменить(Текст, Символы.ВК, "\n");
Текст = СтрЗаменить(Текст, Символы.Таб, " ");

Возврат СтрДлина(Текст);
КонецФункции

FAQ: Частые вопросы по подсчету символов в 1С

ТекстЯчейки = ТабличныйДокумент.Область(1,1).Текст;
КоличествоСимволов = СтрДлина(ТекстЯчейки);

Для Сч = 1 По СтрДлина(Текст) Цикл
Сообщить(Сч + ": " + Сред(Текст, Сч, 1) + " (Код: " + КодСимвола(Сред(Текст, Сч, 1)) + ")");
КонецЦикла;

Процедура ПолеКомментарийПриИзменении(Элемент)
Если СтрДлина(Элемент.Значение) > 500 Тогда
Сообщить("Превышено ограничение в 500 символов!");
Элемент.Значение = Лев(Элемент.Значение, 500);
КонецЕсли;
КонецПроцедуры

ВЫБРАТЬ
ДЛИНА(Заказ.Комментарий) КАК КоличествоСимволов
ИЗ
Документ.ЗаказКлиента КАК Заказ