Есть печатная форма. В ней не умещается значение строки в одну строку. Может кто видел или у кого-нибудь есть готовый алгоритм для разбивки по количеству символов. А то так ломает писать.

а что там писать?

По количеству в общем случае недостаточно, т.к. ширина символов разная. Разве что моноширинный шрифт использовать

(2)Количество можно завсегда занизить.
(1)Строк 10, а то и 15.

(0) автоперенос отменили?

(4) +100500

(4)Ты про тот, что в ячейках? Так он строку-то одну делает с разбухшим самомнением.

(3) Понятно, что _придется_ занижать. Т.е. в _большинстве_ случаев строка будет заполнена на 2/3

(7) у тебя пробела нет? или ты извращенец?

(7) Если на это пофиг, то проблема непонятна. Простейший цикл. +1 к (1)

РазмещениеТекста = Переносить

(8) У меня тэга <u> нет

(11) какого тега, ты о чем?

по теме, тебя чем не устраивает свойство ячейки "переносить"? Ты хочешь "лишний" текст в нижнюю ячейку писать?

(13)Ага.

в таком случае для начала надо область добавить для строк, и потому тупо в цикле считать количество символов, но с учетом (2).

Функция РазбитьСтрокуНаДвеЧасти(СтрокаДляРазбивки, Разделитель, КолСимволовДляПервойЧасти)
   СтруктураРазбитыхСтрок = Новый Структура;
   МассивЧастейСтроки = ОбщегоНазначения.РазложитьСтрокуВМассивПодстрок(СтрокаДляРазбивки, Разделитель);
   Строка1 = "";
   Строка2 = "";
   КонтрСтрока = "";
   Если МассивЧастейСтроки.Количество() > 0 Тогда
       Для Каждого Значение Из МассивЧастейСтроки Цикл
           КонтрСтрока = КонтрСтрока + " "+Значение;
           Если СтрДлина(КонтрСтрока)< КолСимволовДляПервойЧасти Тогда
               Строка1 = Строка1 + " "+Значение;
           Иначе
               Строка2 = Строка2 + " "+Значение;
           КонецЕсли;
       КонецЦикла;    
   КонецЕсли;
   
   СтруктураРазбитыхСтрок.Вставить("Строка1", СокрЛП(Строка1));
   СтруктураРазбитыхСтрок.Вставить("Строка2", СокрЛП(Строка2));
   Возврат СтруктураРазбитыхСтрок;
   
КонецФункции

(12) У тебя цель докопаться или ты не проснулся? Я хотел подчеркиванием выделить слова.

(16)Интересно, но не совсем то.

(17) закрыли тему) все ок

(18) Понимаю! Это просто заготовка.

Ладно, всем спасибо. Лень удалось забороть. Сейчас наваяю.

(0) ширина столбца = 1.25*Количество символов
по памяти с ИТС, не проверял, мб 1.15, где то в стандартах разработки интерфейса

Если кому интересно. стр - исходная строка, ТЗ - две колонки, предел - число символов в строке, строка - полученный обрезок
Процедура РазбитьНаСтроки(стр, ТЗ)
   стр1 = СокрЛП(стр);
   Для Каждого стрк Из ТЗ Цикл
       Если СтрДлина(стр1) = 0 Тогда
           Прервать;
       КонецЕсли;
       предел = стрк.предел;
       длн = 0;
       пп = Найти(стр1, " ");
       Если пп = 0 Тогда
           пп = СтрДлина(стр1);
       КонецЕсли;
       Пока (длн + пп < предел) и (СтрДлина(стр1) > 0) Цикл
           стрк.строка = "" + стрк.строка + Лев(стр1, пп);
           стр1 = Сред(стр1, пп + 1);
           длн = длн + пп;
           пп = Найти(стр1, " ");
           Если пп = 0 Тогда
               пп = СтрДлина(стр1);
           КонецЕсли
       КонецЦикла
   КонецЦикла
КонецПроцедуры

открой тайну предела )