Имя: Пароль:
1C
1С v8
Как изменить размеры изображения из 1С не пользуясь скриптами?
0 al_zzz
 
11.03.16
19:44
Собственно, вопрос в сабже. Делаю выгрузку из 1С на сайт и там выгружаются изображения товаров. Пользуюсь для сжатия скриптами ImageMagick, но столкнулся с тем, что 1С должна запускаться под админскими правами. Естественно, ни один тру админ не захочет себе такого "кота в мешке".
На данный момент делаю мелкой лавочки и там такой вариант пойдет, но хотелось бы универсально, чтоб без проблем использовать для любой конторы.
Подскажите, как Вы, уважаемые коллеги, решали подобную задачу(если решали)?
1 torgm
 
11.03.16
19:48
Использовал микрософтовскую компоненту, сейчас на звания не помню. В понедельник у клиента буду скажу.
2 al_zzz
 
11.03.16
19:54
(1) Спасибо! Было бы неплохо!
3 DGorgoN
 
11.03.16
19:57
4 DGorgoN
 
11.03.16
19:58
objImageFile = Новый COMОбъект("WIA.ImageFile");//objImageFile
    objImageProcess = Новый COMОбъект("WIA.ImageProcess");

    objImageFile.LoadFile("C:\1.bmp");
    
    //блок чисто инфу выводит, можно удалить+
    Сообщить("Width "+objImageFile.Width);
    Сообщить("Height "+objImageFile.Height);
    Сообщить("PixelDepth "+objImageFile.PixelDepth);
    Сообщить("HorizontalResolution "+objImageFile.HorizontalResolution);
    Сообщить("VerticalResolution "+objImageFile.VerticalResolution);
    Сообщить("FrameCount "+objImageFile.FrameCount);
    Если objImageFile.IsAnimated Тогда
        Сообщить("Анимированная");
    Иначе
        Сообщить("НЕ Анимированная");
    КонецЕсли;
    //блок чисто инфу выводит, можно удалить-
    
    objImageProcess.Filters.Add(objImageProcess.FilterInfos("Scale").FilterID);
    
    objImageProcess.Filters.Item(1).Properties.Item("MaximumWidth").Value = 50;
    objImageProcess.Filters.Item(1).Properties.Item("MaximumHeight").Value = 50;
    
    objImageFile = objImageProcess.Apply(objImageFile);
    objImageFile.SaveFile("C:\2.bmp");


Скрыть
5 DGorgoN
 
11.03.16
19:58
Чего вот так вот гуглем не воспользоватся?
6 Записьдампа
 
11.03.16
20:17
(0) И давно 1С для запуска ImageMagic требует админских прав?
7 etc
 
11.03.16
21:00
(6) у них политиками скорее всего разрешен запуск exe-шников только по "белому списку".
8 Garykom
 
гуру
11.03.16
21:05
взять исходники https://github.com/ImageMagick/ImageMagick и оформить в виде требуемой dll|so ВК ?
9 Злопчинский
 
11.03.16
21:19
забабахать GFLax и все. можно многое делать, я например - на кртинки надписи клал...
10 Garykom
 
гуру
11.03.16
21:33
(9) оно не кроссплатформенно никоим образом,

еще http://freeimage.sourceforge.net/features.html - оно уже почти готово для ВК
11 Живой Ископаемый
 
11.03.16
23:42
использовать веб-сервис...
12 romix
 
12.03.16
01:08
Можно запускать IrfanView с ключами в невидимом режиме.
13 al_zzz
 
12.03.16
10:58
Спасибо за подсказки всем!
Попробую (4).