Групповое изменение формата картинок с PNG на JPG

21.01.22

База данных - Инструменты администратора БД

Простой способ массово менять формат картинок с помощью 1С и программы Irfanview.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
Групповое изменение формата картинок с PNG на JPG:
.epf 8,39Kb
8
8 Скачать (1 SM) Купить за 1 850 руб.

У клиента имеется УТ 10.3, ответственные лица сохраняли картинки номенклатуры в базу невзирая на формат. 10000 позиций выгружались на сайт. Картинки, сохраненные в PNG, могут иметь прозрачность. Значительную часть картинок с прозрачностью сайт отображал как изображения с чёрным фоном, что не удовлетворяло заказчика. Была поставлена задача пересохранить картинки с белым фоном в формате JPG.

Пришлось ознакомиться с сайтом, http://tc-image.3dn.ru/Help/Other/irfanviewcmdline.htm, откуда были взят ключ для изменения формата картинок.

По ссылке ниже была скачана и установлена программа irfanview https://www.irfanview.com/

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

Было замечено, что Irfanview не успевает записать на диск часть картинок в новом формате, до того как 1с попытается записать картинку в базу. Была применена задержка, для ожидания работы Irfanview из публикации: //infostart.ru/public/706204/

Замечено, что Irfanview разбирается в том, что файл картинки имеет неправильное расширение, даже если файл картинки имеет расширение PNG, а формат JPG просмотрщик открывает её и выдаёт об этом сообщение. То есть, нет необходимости контролировать, в каком формате было изначально сохранено в базе изображение. Если Irfanview конвертирует в JPG, то неважно, что файл картинки имеет неправильное расширение, итоговый файл JPG будет рабочим. По умолчанию Irfanview отображает прозрачность как чёрный цвет, соответственно и картинки JPG сохраняет с чёрным фоном, вместо прозрачности. Чтобы поменять цвет отображения прозрачности надо перейти в меню просмотрщика по пути Options > Properties/Settings > Viewing > Main window color

Естественно, все манипуляции надо делать, имея проверенную резервную копию базы.

Насколько я заметил, изменение формата PNG в JPG значительно уменьшает размер картинки, что может влиять на объём базы. Видимого уменьшения качества изображения замечено не было.

Механизм мало тестировался для изменения других форматов картинок, возможно, есть нюансы. 

1. Создаём резервную копию базы.

2. Проверяем резервную копию базы.

3. Скачиваем обработку и Irfanview.

4. Меняем цвет отображения прозрачности в Irfanview (если нужно).

5. Заполняем поля обработки:

  • "Путь к каталогу" - любой каталог, к которому есть доступ (лучше на быстром диске).
  • "Расширение для сохранения" - если знаете в каком формате хранятся картинки в базе (по умолчанию можно оставить PNG)
  • "Расширение итогового формата" - расширение формата, в который хотите конвертировать изображения.
  • "Группа номенклатуры" - группа номенклатуры в базе, которая содержит картинки нуждающиеся в смене формата.
  • "Задержка" - количество секунд, необходимых для сохранения файла на диск с новым расширением. 

6. Жмём Выполнить.

Процедура КнопкаВыполнитьНажатие(Кнопка)
Запрос = Новый Запрос;
	Запрос.Текст = 
		"ВЫБРАТЬ
		|	ВЫРАЗИТЬ(ХранилищеДополнительнойИнформации.Объект КАК Справочник.Номенклатура).Код КАК КодНоменклатуры,
		|	ВЫРАЗИТЬ(ХранилищеДополнительнойИнформации.Объект КАК Справочник.Номенклатура).Представление КАК ПредставлениеНоменклатуры,
		|	ХранилищеДополнительнойИнформации.Ссылка КАК Ссылка
		|ИЗ
		|	Справочник.ХранилищеДополнительнойИнформации КАК ХранилищеДополнительнойИнформации
		|ГДЕ
		|	ВЫБОР
		|			КОГДА &ПараметрГруппа
		|				ТОГДА ВЫРАЗИТЬ(ХранилищеДополнительнойИнформации.Объект КАК Справочник.Номенклатура).Родитель В ИЕРАРХИИ (&РодительГруппаНоменклатурыСклад)
		|			ИНАЧЕ (ВЫРАЗИТЬ(ХранилищеДополнительнойИнформации.Объект КАК Справочник.Номенклатура)) = &РодительГруппаНоменклатурыСклад
		|		КОНЕЦ
		|	И ХранилищеДополнительнойИнформации.ВидДанных = &ВидДанныхДополнительнойИнформации";
	
	Запрос.УстановитьПараметр("ПараметрГруппа",?(ГруппаНоменклатуры.ЭтоГруппа,Истина,Ложь));
	Запрос.УстановитьПараметр("РодительГруппаНоменклатурыСклад",ГруппаНоменклатуры);
	Запрос.УстановитьПараметр("ВидДанныхДополнительнойИнформации", Перечисления.ВидыДополнительнойИнформацииОбъектов.Изображение);

	
	РезультатЗапроса = Запрос.Выполнить();
	
	Выборка = РезультатЗапроса.Выбрать();
	Сообщить("Найдено "+ Выборка.Количество()+ "элементов.");
	СчетчикЭлементовСправочника = 0;
	Пока Выборка.Следующий() Цикл
		
	ОбъектХранилище = Выборка.Ссылка.ПолучитьОбъект();
	Картинка = Выборка.Ссылка.Хранилище.Получить();
	Сообщить("Будем перезаписывать: " +Выборка.ПредставлениеНоменклатуры+"/"+Выборка.КодНоменклатуры);	
	Попытка
		СтрокаПутиФайла =  ПутьККаталогу+"\ФайлПерезаписи."+РасширениеДляСохранения;
		Картинка.Записать(СтрокаПутиФайла);                                     
		Ирфин = Новый Файл("C:\Program Files\IrfanView\i_view64.exe");
		ЗапуститьПриложение("" + Ирфин.ПолноеИмя +" " + СтрокаПутиФайла+ " /convert="+Лев(СтрокаПутиФайла, СтрДлина(СтрокаПутиФайла)-3)+РасширениеИтоговогоФормата);
//Задержка, чтобы файл успел сохраниться на диск 	
    	ЗадержкаСекунд = Задержка;
		Сигнатура = Формат(ТекущаяДата(), "ДФ=yyyyMMddhhmmss");
		ПутьСкрипта = КаталогВременныхФайлов()+"SleepScript"+Сигнатура+".vbs";
		СкриптФайл = Новый ТекстовыйДокумент;
		СкриптФайл.ДобавитьСтроку("WScript.Sleep("+Формат(ЗадержкаСекунд*1000, "ЧГ=0")+")");
		СкриптФайл.Записать(ПутьСкрипта, КодировкаТекста.OEM);
		WSHShell = Новый COMОбъект("WScript.Shell");
		WSHShell.Run("wscript.exe """+ПутьСкрипта+"""", 0, 1);
		УдалитьФайлы(ПутьСкрипта);
//Задержка, чтобы файл успел сохраниться на диск 		
		ОбъектХранилище.Хранилище = Новый ХранилищеЗначения(Новый Картинка(Лев(СтрокаПутиФайла, СтрДлина(СтрокаПутиФайла)-3)+РасширениеИтоговогоФормата));
		ОбъектХранилище.Записать();

		УдалитьФайлы(СтрокаПутиФайла);
		УдалитьФайлы(Лев(СтрокаПутиФайла, СтрДлина(СтрокаПутиФайла)-3)+"jpg");

	Исключение
		Предупреждение(ОписаниеОшибки());
	КонецПопытки;
	СчетчикЭлементовСправочника = СчетчикЭлементовСправочника +1;

	КонецЦикла;
Сообщить ("Перезаписали "+СчетчикЭлементовСправочника+" изображений.")
КонецПроцедуры

Обработка только для УТ 10.3, проверена на релизе 10.3.8.9.

Вся новизна публикации только 2 строках:

Ирфин = Новый Файл("C:\Program Files\IrfanView\i_view64.exe");
		ЗапуститьПриложение("" + Ирфин.ПолноеИмя +" " + СтрокаПутиФайла+ " /convert="+Лев(СтрокаПутиФайла, СтрДлина(СтрокаПутиФайла)-3)+РасширениеИтоговогоФормата);

Обработка тестировалась на УТ 10.3.8.9 и УТ 10.3.64.3

Картинка формат групповое изменение чёрный фон прозрачность PNG JPG

См. также

Инструментарий разработчика Чистка данных Свертка базы Инструменты администратора БД Системный администратор Программист Руководитель проекта Платформа 1С v8.3 Конфигурации 1cv8 1С:Управление торговлей 10 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 Россия Платные (руб)

Инструмент представляет собой обработку для проведения свёртки или обрезки баз данных. Работает на ЛЮБЫХ конфигурациях (УТ, БП, ERP и т.д.). Поддерживаются управляемые и обычные формы. Может выполнять свертку сразу нескольких баз данных и выполнять их автоматически без непосредственного участия пользователя.

8400 руб.

20.08.2024    4612    30    16    

43

Инструменты администратора БД Роли и права Системный администратор Программист Пользователь 8.3.14 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Документооборот 1С:Зарплата и кадры государственного учреждения 3 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Платные (руб)

Роли… Вы тратите много времени и сил на подбор ролей среди около 2400 в ERP или 1500 в Рознице 2, пытаясь понять какими правами они обладают? Вы все время смотрите права в конфигураторе или отчетах чтоб создать нормальные профили доступа? Вы хотите наглядно видеть какие права дает профиль и редактировать все в простом виде? А может хотите просто указать подсистему и дать права на просмотр и добавление на объекты и не лезть в дебри прав и чтоб обработка сама подобрала нужные роли? Все это теперь стало возможно! Обновление от 18.09.2024, версия 1.2

15600 руб.

06.12.2023    7880    36    5    

67

Инструменты администратора БД Инструментарий разработчика Роли и права Программист Платформа 1С v8.3 Конфигурации 1cv8 Россия Платные (руб)

Расширение позволяет без изменения кода конфигурации выполнять проверки при вводе данных, скрывать от пользователя недоступные ему данные, выполнять код в обработчиках. Не изменяет данные конфигурации, легко устанавливается практически на любую конфигурацию на управляемых формах.

10000 руб.

10.11.2023    9505    35    10    

58

Закрытие периода Инструменты администратора БД Корректировка данных Бухгалтер Пользователь Бухгалтерский учет 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

Расширение «Оперативное проведение» в 4 раза уменьшает время проведения документов и закрытия месяца. Является комплексным решением проблем 62 и 60 счетов. Оптимизирует проведение при включенной функциональной опции «Раздельный учет НДС». Используется в более 10 организациях уже 2 года. Совместимо с конфигурацией Бухгалтерия 3.0 (+КОРП).

14400 руб.

29.04.2020    31935    100    151    

72

SALE! %

Инструментарий разработчика Инструменты администратора БД Системный администратор Программист Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Россия Платные (руб)

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

4800 3840 руб.

14.01.2013    185942    1127    0    

900

Архивирование (backup) Инструменты администратора БД Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Платные (руб)

Данная разработка позволит решить вопрос с резервным копированием Ваших баз в автоматическом режиме, расположенных на сервере 1С. Система умеет ставить блокировки на вход, блокировать фоновые задания, принудительно отключать сеансы пользователей. И все это система делает в автоматически при создании бэкапа (или через команду). Выгрузка происходит в родной формат 1С - .dt. Так же система умеет архивировать данные выгрузки с установкой пароля. Умеет менять расширение файла zip или dt на любое указанное вами, что позволит сохранить выгрузки от шифровальщика. Может удалять старые копии выгрузок, оставляя указанное количество резервных копий, начиная с самой поздней. Только для WINDOWS!

6000 руб.

06.11.2012    72287    625    45    

84

Инструменты администратора БД Системный администратор Платформа 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Управление производственным предприятием Платные (руб)

Конфигурация Комплексная автоматизация 1.1 (и УПП 1.3 тоже) хранит файлы и изображения в справочнике Хранилище дополнительной информации в реквизите Хранилище типа ХранилищеЗначений. Та же история с ВложениямиЭлектроннойПочты. Но при этом присоединенные файлы в Электронном документообороте хранит в томах на диске. Эта доработка позволяет использовать стандартный механизм хранения файлов, изображений и вложений электронных писем в томах на диске. При этом можно разделить тома хранения по объектам конфигурации.

4200 руб.

10.11.2015    62555    92    59    

77

Инструменты администратора БД Пользователь Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Платные (руб)

Многие сталкиваются с проблемой когда изображения, находящиеся в базе разные по объему и размерам. Менеджеры могут добавить файлы в очень высоком разрешении, объемом свыше 20 Мегабайт. База данных становится слишком большой, выгрузка на сайт идёт медленно и требуется много место на хостинге. Как сжать картинки и уменьшить размер базы 1С? Это можно сделать с помощью данной обработки. Существует возможность выбрать различные варианты для того чтобы уменьшить картинки: в разы, в процентах от первоначального объема, а также сделать картинки одинаковой ширины. В результате размер базы 1С значительно сократится (в зависимости от количества и размера картинок), а изображения станут небольшого объема, равными по ширине, почти без потери качества. Работает на управляемых формах для УТ 11, КА, ERP.

3000 руб.

21.07.2022    9623    7    4    

15
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. RWS88 1 16.03.23 13:28 Сейчас в теме
Спасибо за обработку!
2. TokarevV 33 16.03.23 13:47 Сейчас в теме
(1) Пожалуйста!
Плюсецкий мне поставьте))
Оставьте свое сообщение