ЗаписьPDF.ПреобразоватьВОттенкиСерого

Методы · ConvertToGrayScale

Преобразует цветовой режим PDF-документа в режим "оттенки серого".

Синтаксис

ПреобразоватьВОттенкиСерого()
Полное описание, параметры и ограничения

ЗаписьPDF.ПреобразоватьВОттенкиСерого (PDFWriter.ConvertToGrayScale)

ЗаписьPDF (PDFWriter)

ПреобразоватьВОттенкиСерого (ConvertToGrayScale)

Доступен, начиная с версии 8.3.18.

Синтаксис:
ПреобразоватьВОттенкиСерого()
Описание:

Преобразует цветовой режим PDF-документа в режим "оттенки серого".

Доступность:

Сервер, толстый клиент.

Использование в версии:

Доступен, начиная с версии 8.3.18.

Методическая информация

Практические примеры

Преобразовать свой цветной PDF в оттенки серого

Учебная ячейка экспортируется с синим текстом. После преобразования проверяем читаемость PDF и сохранность JSON: изменение цвета не равно удалению вложений.

Где и как запускать

Серверная процедура отдельной учебной базы; собственный PDF и потоки в памяти.

Подготовка

  1. Используйте отдельную учебную базу. Фрагмент без директив вставьте в тело серверной процедуры ВыполнитьПример() Экспорт общего модуля УчебныеЗадачи.

  2. Все исходные байты создаются самим примером в памяти. Файлы, сеть, справочники и документы не нужны.

  3. Запускайте задачи отдельно. После закрытия ЧтениеДанных/ЗаписьДанных не используйте этот экземпляр повторно.

  4. Документ PDF строится из собственной ячейки Книга: 3 шт. Внешний PDF, установленный PDF-редактор, криптографический сертификат и реальные персональные данные не нужны.

  5. Файловый путь нигде не используется. Для просмотра в PDF-программе сохраните только полученные собственные двоичные данные в отдельно выбранный новый учебный файл.

Вложения = Новый КоллекцияВложенийPDF;
ТекстJSON = "{""товар"":""Книга"",""количество"":3}";
БайтыJSON = ПолучитьДвоичныеДанныеИзСтроки(ТекстJSON, КодировкаТекста.UTF8, Ложь);
Вложения.Добавить("товар.json", БайтыJSON, "application/json", ТипСвязиВложенияPDF.Данные);
Чтение = Неопределено;
Запись = Неопределено;
ПотокЧтения = Неопределено;
ПотокPDF = Новый ПотокВПамяти;
Документ = Новый ТабличныйДокумент;
Документ.Область("A1").Текст = "Книга: 3 шт.";
Документ.Область("A1").ЦветТекста = Новый Цвет(30, 90, 180);
Попытка
    Документ.Записать(ПотокPDF, ТипФайлаТабличногоДокумента.PDF, Вложения);
    ПотокPDF.Перейти(0, ПозицияВПотоке.Начало);
    Запись = Новый ЗаписьPDF(ПотокPDF);
    Запись.ПреобразоватьВОттенкиСерого();
    Запись.Закрыть();
    Запись = Неопределено;
    БайтыPDF = ПотокPDF.ЗакрытьИПолучитьДвоичныеДанные();
    ПотокPDF = Неопределено;
    ПотокЧтения = БайтыPDF.ОткрытьПотокДляЧтения();
    Чтение = Новый ЧтениеPDF(ПотокЧтения);
    Прочитанные = Чтение.ПолучитьВложения();
    ФайлJSON = Прочитанные.Найти("товар.json");
    Если ФайлJSON = Неопределено Тогда
        ВызватьИсключение "В собственном PDF не найдено ожидаемое вложение";
    КонецЕсли;
    Сообщить(Прочитанные.Количество() = 1);
    Сообщить(ПолучитьСтрокуИзДвоичныхДанных(ФайлJSON.Содержимое, КодировкаТекста.UTF8) = ТекстJSON);
Исключение
    Если Чтение <> Неопределено Тогда
        Чтение.Закрыть();
    КонецЕсли;
    Если Запись <> Неопределено Тогда
        Запись.Закрыть();
    КонецЕсли;
    Если ПотокЧтения <> Неопределено Тогда
        ПотокЧтения.Закрыть();
    КонецЕсли;
    Если ПотокPDF <> Неопределено Тогда
        ПотокPDF.Закрыть();
    КонецЕсли;
    ВызватьИсключение;
КонецПопытки;
Если Чтение <> Неопределено Тогда
    Чтение.Закрыть();
КонецЕсли;
Если Запись <> Неопределено Тогда
    Запись.Закрыть();
КонецЕсли;
Если ПотокЧтения <> Неопределено Тогда
    ПотокЧтения.Закрыть();
КонецЕсли;
Если ПотокPDF <> Неопределено Тогда
    ПотокPDF.Закрыть();
КонецЕсли;

Разбор по шагам

  1. Цвет задан у собственной ячейки до экспорта. Работа идёт в серверном контексте, где доступен синхронный метод преобразования.

  2. Открываем уже созданный PDF для записи и вызываем ПреобразоватьВОттенкиСерого.

  3. После закрытия записи открываем новые байты для чтения и проверяем собственное JSON-вложение.

  4. Для проверки самого оттенка необходимо отдельно посмотреть результат в PDF-программе; проверка вложения не измеряет цвет пикселей.

Как проверить результат

  1. Две проверки Истина; JSON остаётся исходным.

  2. После ручного сохранения собственного результата проверьте, что текст не синий, а серый; автоматического визуального подтверждения здесь нет.

Ожидаемый результат

Вызвано преобразование цвета собственного документа; вложение проверено отдельно.

На что обратить внимание

  1. Успех ПолучитьВложения сам по себе не доказывает визуальную корректность страницы.

  2. Преобразование не равно сжатию, OCR, PDF/A-валидации или удалению скрытых сведений.

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

Открыть запись своего PDF, преобразовать в серый и закрыть

Создаём собственный файл, отдельно открываем неинициализированный ЗаписьPDF и сохраняем преобразование закрытием записи.

Где и как запускать

Полный серверный общий модуль УчебныеФайлыPDF; свой файл на серверной машине.

Подготовка

  1. Работайте только в отдельной своей конфигурации УчебнаяКонфигурацияСинтаксиса, 8.5.1.1343. Исходная таблица Книга / 3 / 250 / 750 создаётся полностью в коде.

  2. Для синхронных уроков вставьте полный модуль в серверный общий модуль УчебныеФайлыPDF и вызовите ВыполнитьПример() своей серверной командой. Новый временный файл будет на серверной машине, не обязательно на вашем ПК.

  3. Для асинхронного и callback-урока вставьте полный код в модуль управляемой формы внешней обработки. Создайте команду Выполнить, обработчик Выполнить, кнопку. Используйте толстый клиент Windows; файл создаётся на клиентской машине.

  4. Код сначала получает новое временное имя, проверяет отсутствие файла и выводит точный путь. Только после этого записывает собственные PDF-байты. Рабочий или выбранный пользователем PDF нигде не запрашивается.

  5. ЗаписьPDF изменяет именно созданный этим запуском файл. Чтение результата начинается после закрытия записи. Файл оставляется пользователю для просмотра и ручного удаления; автоматического удаления нет.

  6. Удаление вложений допустимо начиная с PDF 1.5. Пример проверяет первые восемь символов собственного файла перед этой операцией. Для PDF/A-1 или PDF/A-2 произвольные CSV-вложения не подходят.

  7. До завершения асинхронной цепочки форму не закрывайте и второй запуск не выполняйте. При ошибке начала шага успех не объявляется. Ни создание пособия, ни его Python-тесты этот код в 1С не выполняют.

Функция СоздатьСобственныеБайтыPDF()
    Таблица = Новый ТабличныйДокумент;
    Таблица.КодЯзыка = "ru";
    Таблица.Область(1, 1).Текст = "СОБСТВЕННЫЙ УЧЕБНЫЙ ОБРАЗЕЦ";
    Таблица.Область(2, 1).Текст = "Книга";
    Таблица.Область(2, 2).Текст = "3";
    Таблица.Область(2, 3).Текст = "250";
    Таблица.Область(2, 4).Текст = "750";
    Таблица.Область(1, 1, 2, 4).ЦветФона = Новый Цвет(255, 255, 210);
    Таблица.Область(, 1, , 1).ШиринаКолонки = 45;
    Поток = Новый ПотокВПамяти;
    Попытка
        Таблица.Записать(Поток, ТипФайлаТабличногоДокумента.PDF);
        Данные = Поток.ЗакрытьИПолучитьДвоичныеДанные();
    Исключение
        Поток.Закрыть();
        ВызватьИсключение;
    КонецПопытки;
    Возврат Данные;
КонецФункции

Функция СоздатьСвойФайлPDF(Данные)
    Имя = ПолучитьИмяВременногоФайла("pdf");
    Проверка = Новый Файл(Имя);
    Если Проверка.Существует() Тогда
        ВызватьИсключение "Новое имя уже занято: перезапись запрещена";
    КонецЕсли;
    Сообщить("Создаётся только собственный PDF: " + Имя);
    Данные.Записать(Имя);
    Возврат Имя;
КонецФункции

Процедура ВыполнитьПример() Экспорт
    Имя = СоздатьСвойФайлPDF(СоздатьСобственныеБайтыPDF());
    Запись = Новый ЗаписьPDF;
    Попытка
        Запись.Открыть(Имя);
        Запись.ПреобразоватьВОттенкиСерого();
        Запись.Закрыть();
    Исключение
        ОшибкаОперации = ОписаниеОшибки();
        Попытка
            Запись.Закрыть();
        Исключение
            ОшибкаОперации = ОшибкаОперации + Символы.ПС + "Ошибка закрытия: " + ОписаниеОшибки();
        КонецПопытки;
        ВызватьИсключение ОшибкаОперации;
    КонецПопытки;
    Документ = Новый ДокументPDF;
    Документ.Прочитать(Имя);
    Сообщить(Документ.КоличествоСтраниц() > 0);
    Сообщить(Документ.Вложения.Количество() = 0);
    Сообщить("Собственная серая копия оставлена для ручного просмотра: " + Имя);
КонецПроцедуры

Разбор по шагам

  1. Получить новое временное имя и проверить отсутствие существующего файла до записи собственных PDF-байтов.

  2. Создать пустой ЗаписьPDF и вызвать Открыть с точным именем только что созданного файла.

  3. Выполнить преобразование и явно закрыть запись. На ошибке попытаться закрыть её и сохранить обе причины ошибки.

  4. Только после закрытия прочитать файл через ДокументPDF. Визуально проверить серую подложку по выведенному пути.

Как проверить результат

  1. Две структурные проверки дают Истина: файл читается, есть страницы, нет вложений.

  2. В своём файле вручную проверить строку книги и серую подложку. Исходный рабочий документ не использовался.

Ожидаемый результат

Настоящий жизненный цикл отдельного PDF-писателя на своём файле с диагностикой закрытия.

На что обратить внимание

  1. ЗаписьPDF не создаёт произвольный новый документ из пустоты: сначала собственная таблица экспортируется в PDF.

  2. Закрытие завершает работу записи. Не читайте результат одновременно с открытым писателем.

  3. Путь временного файла может быть серверным. Файл оставлен для ручного удаления; весь временный каталог удалять нельзя.

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

Не хотите разбираться сами?

Адаптируем это решение под вашу базу. Оценка бесплатно.

Оставить задачу

1С, 1С:Предприятие — товарные знаки ООО «1С». Сайт не является официальным представительством фирмы «1С» и не аффилирован с ней.