Имя: Пароль:
1C
 
Как уменьшить картинку в ПолеHTMLДокумента?
,
0 Галахад
 
гуру
18.06.15
06:58
Обычные формы.
Положил на форму ПолеHTMLДокумента с именем "ПолеHTML"
Вывожу туда картинку.
  ЭлементыФормы.ПолеHTML.Перейти(ВременныйПуть);

Картинка выходит, но хотелось бы как-то ее отмасшатбировать.
А то в поле не вмещается.
1 ЧеловекДуши
 
18.06.15
07:12
(0) Изменение размеров рисунка
http://htmlbook.ru/samhtml/izobrazheniya/izmenenie-razmerov-risunka
2 Галахад
 
гуру
18.06.15
07:25
(1) Гм. А как в синтаксисе 1С-а?
3 ЧеловекДуши
 
18.06.15
07:51
(2) Так же HTML поле, это по сути ХТМЛ страница.
4 ЧеловекДуши
 
18.06.15
07:51
+(3) Сори... почит... с тонким клиентом перепутал :)
5 ЧеловекДуши
 
18.06.15
07:53
+(2) Почему именно поле HTML?
6 Галахад
 
гуру
18.06.15
08:00
(5) Вообще задача была выводить pdf документ, который кстати замечательно выводится.
А оказалось, что часть документов в jpg-ах. Они тоже выводятся, но вот размер смущает.
7 ЧеловекДуши
 
18.06.15
08:04
(6) Лучше выводить через внешние приложения.
Вывод в 1С конечно как бы удобно, но куча с этим проблем.

...Попробуй прогнуть вывод через другие программки, вдруг получится... Народу все ровно побоку, где что читать :)
8 Галахад
 
гуру
18.06.15
08:07
(7) Не. Проще принять pdf как стандарт. ;-)
Единственная проблема со старыми документами.
Что в принципе не очень важно, т.к. есть кнопка "Скачать",
но хотелось бы красивостей...
9 Patriot1C
 
29.06.15
23:32
Показать, повернуть и увеличить картинку в 1С
http://catalog.mista.ru/public/242659/
10 Галахад
 
гуру
30.06.15
05:01
(9) Спасибо.

Сделал по простецки:

    ВременныйПуть = КаталогВременныхФайлов() + ТекСтр.ИмяФайла;
            
    РаботаСФайлами.СохранитьФайлНаДиске(ТекСтр.Хранилище, ВременныйПуть, Ложь, "", Ложь );

    Если Найти(ТекСтр.ИмяФайла, "jpg") > 0 ИЛИ Найти(ТекСтр.ИмяФайла, "jpeg") > 0 ИЛИ Найти(ТекСтр.ИмяФайла, "png") > 0 Тогда
        
        Текст=
        "<HTML><HEAD>
        |<META http-equiv=Content-Type content=""text/html; charset=utf-8"">
        |<META content=""MSHTML 6.00.2900.6287"" name=GENERATOR></HEAD>
        |<BODY><IMG src="""+ВременныйПуть+""" width=800 align=""middle"" border=2></BODY></HTML>";
        
        ЭлементыФормы.ПолеHTML.УстановитьТекст(Текст);    
        
    Иначе
        
        ЭлементыФормы.ПолеHTML.Перейти(ВременныйПуть);
        
    КонецЕсли;
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование. Фредерик Брукс-младший