|
Как уменьшить картинку в ПолеHTMLДокумента?
| ☑ |
0
Галахад
гуру
18.06.15
✎
06:58
|
Обычные формы.
Положил на форму ПолеHTMLДокумента с именем "ПолеHTML"
Вывожу туда картинку.
ЭлементыФормы.ПолеHTML.Перейти(ВременныйПуть);
Картинка выходит, но хотелось бы как-то ее отмасшатбировать.
А то в поле не вмещается.
|
|
1
ЧеловекДуши
18.06.15
✎
07:12
|
(0) Изменение размеров рисунка
|
|
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.Перейти(ВременныйПуть);
КонецЕсли;
|
|
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование. Фредерик Брукс-младший