Имя: Пароль:
1C
1С v8
Преобразовать из BMP в JPG
0 programmer1c_
63
 
12.09.13
15:11
Стоит задача - преобразовать картинки в базе из BMP в JPG и поместить обратно. Это можно сделать средствами 1С - есть оператор "Преобразовать", но он срабатывает не для всех картинок - для некоторых пишет ошибку преобразования. Картинки, которые преобразуются, хранятся в BMP - просто какие-то преобразовались, а какие-то нет. Подскажите - какими средствами можно еще попробовать преобразовать?
1 H A D G E H O G s
 
12.09.13
15:12
Скора будет Нетленка 3.0, там запреобразовываетесь вволю. Ждите.
2 Скай
 
12.09.13
15:12
Найти утилиту с командным интерфейсом
3 Asmody
 
12.09.13
15:16
(0) imagemagick — convert
4 mzelensky
 
12.09.13
15:17
(0) накатай библиотеку на делфях. Готовые Примеры в инете есть.
5 programmer1c_
63
 
12.09.13
15:29
(3) imagemagick  - ее устанавливать надо?
6 h_miha
 
12.09.13
15:47
(5) нет, на их сайте есть даже дистрибутив без установки
сам недавно с этой прогой работал из 1с
7 programmer1c_
63
 
12.09.13
15:51
может кому пригодится ... Скинули вот такое решение

        
        Если НРег(ДвоичныеДанные.Формат()) = "tiff" Тогда   //Новый
            
            КаталогТ = "1C_pictures_"+Формат(ТекущаяДата(),"ДФ=yyyyMMddЧЧммсс") + "\";
            Ирфан = ПолучитьМакет("IrfanView");
            СоздатьКаталог(Каталог + КаталогТ);
            Ирфан.Записать(Каталог + КаталогТ + "i_view32.exe");
            ТекстШаблона = """" +  Каталог + КаталогТ + "i_view32.exe"" """ + Путь + """ /extract=(""" + Каталог + КаталогТ + """,jpg) /cmdexit";
            Текст = Новый ТекстовыйДокумент;
            Текст.ДобавитьСтроку(ТекстШаблона);
            Текст.Записать(Каталог + КаталогТ + "cmd.bat", "cp866");
            ЗапуститьПриложение(Каталог + КаталогТ + "cmd.bat",, Истина);