v7: Просмотр картинок в png

1C 7.7

10.02.22

✎

17:27

Есть фотки товаров пока что сними бардак часть в жпг часть в пнг в будущем думают все в пнг держать как реализовать просмотр.
Нашел СоздатьОбъект("GFLAx.GFLAx"); но не нашел синтаксиса как ей жпг в пнг пересохранить или есть вк которые могут без этой операции картинки показывать?

1 ДенисЧ

10.02.22

✎

17:29

irfan запускай с путём картинки...

2 uno-group

10.02.22

✎

17:32

так чете идея. там может быть несколько картинок с различного ракурса, а при запуске постороннего просмотрщика фокус на него перейдет. потом переключайся на 1с и смотри следующее фото.

3 uno-group

10.02.22

✎

17:32

так себе идея

4 acht

10.02.22

✎

17:32

"сними бардак"

https://www.devhut.net/vba-wia-convert-the-image-format/

5 Kigo_Kigo

10.02.22

✎

17:35

Процедура ПриОткрытии()
    ИмяФотографии = Форма.Параметр;
    ИмяФотографии = СокрЛП(ИмяФотографии);
    Если ПустаяСтрока(ИмяФотографии) = 1 Тогда
        Сообщить("Файл с фотографией не сопаставлен");
    Иначе
        Если ФС.СуществуетФайл(ИмяФотографии) =1 тогда
            Картинка.РежимРисования(3);
            Картинка.Загрузить(ИмяФотографии);
Иначе
            Предупреждение("Отсутствует файл фотографии");
        КонецЕсли
    КонецЕсли;


КонецПроцедуры

на форме обработки картинка с идентификатором картинка, кажет джпеги  и пнг только в путь

6 uno-group

10.02.22

✎

17:37

(5) картинка отображает бмп и жпг. пнг не хавает

7 acht

10.02.22

✎

17:37

(5) > "не сопаставлен"
Проверочное слово - "пасть"

8 uno-group

10.02.22

✎

17:38

(4) а на 7.7 есть пример

9 Смотрящий

10.02.22

✎

17:40

(6) пнг у вас не той системы

10 mistеr

10.02.22

✎

17:40

Фотки в PNG так себе идея. Фотки нужно в JPG.

11 Kigo_Kigo

10.02.22

✎

17:42

(6) а да точно, пнг наверно не жрет, хотя не уверен
(8)Эт он тебе предлагает конвертнуть с помощью скрипта VBA все в один формат, как я понял
(7) мне а че не "пасть"?
(10) А может быть ему прозрачный фон нада :)

12 acht

10.02.22

✎

17:43

(8) ты программист

13 АгентБезопасной Нацио

10.02.22

✎

17:43

(7) "пастИ" же ?

14 acht

10.02.22

✎

17:43

(13) Нет. Именно этот глагол.

15 АгентБезопасной Нацио

10.02.22

✎

17:51

ImageMagick тоже могЁт конвертировать

16 uno-group

10.02.22

✎

17:57

(12) типа да. как то так.
    sFormatID = "{B96B3CAF-0728-11D3-9D7B-0000F81EF32E}";
    sExt = "PNG";
    oWIA = CreateObject("WIA.ImageFile");
    oIP = CreateObject("WIA.ImageProcess");
// вот ниже какой правильный синтаксис не пойму
    oIP.Filters.Add oIP.FilterInfos("Convert").FilterID;
    oIP.Filters(1).Properties("FormatID") = sFormatID;
    oIP.Filters(1).Properties("Quality") = 100;
    oWIA.LoadFile("D:\1с\1.png");
    oWIA = oIP.Apply(oWIA);
    oWIA.SaveFile("d:\1с\1.jpg");

17 acht

10.02.22

✎

18:22

Попробуй типа
oIP.Filters.Add(oIP.FilterInfos("Convert").FilterID);
oIP.Filters(1).Properties("FormatID").Value = sFormatID;
oIP.Filters(1).Properties("Quality").Value = 100;

18 uno-group

10.02.22

✎

18:42

oWIA = CreateObject("WIA.ImageFile");
{D:\1С\BARA\EXTFORMS\КАРТИНКА.ERT(5)}: Неудачная попытка создания объекта (WIA.ImageFile)
Что нужно поставить вроде все стоит от мелкомягких

19 acht

10.02.22

✎

18:49

Это стандартная библиотека. На десктопе - начиная с Windows Vista, на сервере - с Windows Server 2003 R2.

20 uno-group

10.02.22

✎

18:52

вин серв 2012 64.

21 acht

10.02.22

✎

19:17

Хорошо

22 Злопчинский

10.02.22

✎

22:33

госпадя....
https://infostart.ru/public/16038/ - моя приблуда от нечего делать когда-то сделал, там есть ссылка на оригинал от Маляева. который как раз пример в ГФЛаксе