Торг-12. Проблема печати

1. notepad 17.08.12 15:28 Сейчас в теме
Подскажите, если в 1С 7.7 торг-12 полные наименования иногда очень длинные, и если сделать высоту строки авто, то не считает правильно страницы, да и перенос на другую страницу не совпадает. Может есть готовая внешняя печатная форма без этой проблемы или это сложно сделать?
По теме из базы знаний
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. el_bucho 5 17.08.12 16:00 Сейчас в теме
Самое простое решение - уменьшить КоличествоСтрокНаЛисте в процедуре Печать. Но я бы сделал расчет количества строк по полному наименованию. Не забудьте проверить последнюю строку документа (чтобы подвал был на одном листе с ней).
3. notepad 17.08.12 16:14 Сейчас в теме
Интересно как сделать расчет количества строк при полном наименование, если ВысотаСтроки() - при высоте авто возвращает нуль?
4. el_bucho 5 17.08.12 16:20 Сейчас в теме
Сосчитать максимальное количество символов в строке и поделить длину полного наименования на него.
5. notepad 17.08.12 16:48 Сейчас в теме
Не могу понять, как посчитать максимальное количество символов в строке до переноса находящейся в одной строке с переносами строки? Кол-во символов может очень различаться.
МногоСимволов
и
Малосиволов
непонятно

можно уместить в три строчки если был бы другой порядок.
6. kiser 17.08.12 18:42 Сейчас в теме
(5) notepad, очень просто)
123456789012345678901234567890123456789012345678901234567890­1234567890123456789012345678901234567890123456789012
НУ вот тут в строку влезло 112 символов, вы берете длину вашего Очень_такого_самого_длинного_названия и делите на посчитанную длину строки) берете целое значение + 1 и вот вам количество строк на которое разделится ваше Очень_такого_самого_длинного_название)
7. el_bucho 5 18.08.12 00:15 Сейчас в теме
Примерно так:

Функция ПосчитатьВысотуСтроки(Стр)
     МаксДлинаСтроки = 40; //например - надо посчитать на конкретной накладной, зависит от шрифта по умолчанию
     КолВоСтрок = СтрДлина(Стр)/МаксДлинаСтроки;
     //Проверим конец строки, чтобы округление не обрезало хвостик
     Если Цел(КолВоСтрок) < КолВоСтрок Тогда
          КолВоСтрок = Цел(КолВоСтрок) + 1;
     КонецЕсли;
     Возврат КолВоСтрок;
КонецФункции
Показать


Получаем расчетную высоту строки, а дальше смотрим влезает строка + итог по листу или надо делать новый лист.
8. CheBurator 2712 19.08.12 19:50 Сейчас в теме
тупые рецепты от тупых кодеров. если изменяем шрифт/размер макета - все тотально пересчитывать. Если вдруг к наименованию решили приструячить штрихкод - все переделывать и т.д.
.
Если сильно надо будет - пиши, дам готовыую ВПФ. ЗАДОРОГО. ПРИЧЕМ РЕАЛЬНО ЗАДОРОГО.
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот