1С 8.3 Программно подчеркнуть текст в макете
Данные > Примеры кода 1С > 1С 8.3 Табличный документ / Макет
Перейти в раздел примеры кода 1С 8.3:
Подчеркнуть текст в 1С 8.3:
Функция ПодчеркнутьТекст(ВходящаяСтрока) Экспорт
ПодчёркнутаяСтрока = "";
Для а = 1 По СтрДлина(ВходящаяСтрока) Цикл
Если Найти(" _-", Сред(ВходящаяСтрока, а, 1)) = 0 Тогда
ПодчёркнутаяСтрока = ПодчёркнутаяСтрока + Символ(863); // подчеркивание "_"
КонецЕсли;
ПодчёркнутаяСтрока = ПодчёркнутаяСтрока + Сред(ВходящаяСтрока, а, 1);
КонецЦикла;
Возврат ПодчёркнутаяСтрока;
КонецФункции
ПодчёркнутаяСтрока = "";
Для а = 1 По СтрДлина(ВходящаяСтрока) Цикл
Если Найти(" _-", Сред(ВходящаяСтрока, а, 1)) = 0 Тогда
ПодчёркнутаяСтрока = ПодчёркнутаяСтрока + Символ(863); // подчеркивание "_"
КонецЕсли;
ПодчёркнутаяСтрока = ПодчёркнутаяСтрока + Сред(ВходящаяСтрока, а, 1);
КонецЦикла;
Возврат ПодчёркнутаяСтрока;
КонецФункции
0
комментарии
____________________
Перепечатка текста и фотографий разрешена при наличии прямой ссылки на источник