Обработка-редактор HTML
Разработка - Работа с интерфейсом
Файлы
ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.
Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний
Оформите подписку на компанию для решения рабочих задач
Оформить подписку и скачать решение со скидкойВы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».
- 0% комиссии — оплата напрямую исполнителю;
- Исполнители любого масштаба — от отдельных специалистов до команд под проект;
- Прямой обмен контактами между заказчиком и исполнителем;
- Безопасная сделка — при необходимости;
- Рейтинги, кейсы и прозрачная система откликов.
Переработка / компиляция публикаций:
infostart.ru/public/412695
infostart.ru/public/75313
Отличия
- Все упаковано в одну обработку (формы, картинки, модули)
- Добавлена возможность вставки изображений (встраиваются как data:image, base64)
- Исправлены некоторые недочеты
Использование
- Встроить обработку-редактор HTML в конфигурацию (или расширение).
- В нужной форме добавить код:
&НаКлиенте Процедура ПолеHTMLДокументаПриНажатии(Элемент, ДанныеСобытия, СтандартнаяОбработка) ПараметрыФормы = Новый Структура; ПараметрыФормы.Вставить("ТекстHTML", Объект.Реквизит1); ОписаниеОповещения = Новый ОписаниеОповещения("ПослеИзмененияТекстаHTML", ЭтотОбъект, Элемент); ОткрытьФорму("Обработка.РедакторHTML.Форма", ПараметрыФормы, ЭтаФорма, ЭтаФорма, , , ОписаниеОповещения, РежимОткрытияОкнаФормы.БлокироватьОкноВладельца); КонецПроцедуры &НаКлиенте Процедура ПослеИзмененияТекстаHTML(ДанныеВыбора, Элемент) Экспорт Если ДанныеВыбора = Неопределено тогда Возврат; КонецЕсли; Объект.Реквизит1 = ДанныеВыбора; Элемент.Документ.Body.innerHTML = Объект.Реквизит1; Модифицированность = Истина; КонецПроцедуры &НаКлиенте Процедура ПолеHTMLДокументаДокументСформирован(Элемент) Элемент.Документ.Body.innerHTML = Объект.Реквизит1; КонецПроцедуры - Заменить в коде
на имя реквизита, В котором хранятся данныеОбъект.Реквизит1
Тестировалось на 1С:Предприятие 8.3 (8.3.14.1630).
Changelog
13.06.2009 Исправлена работа кнопок работы с буфером обмена
Вступайте в нашу телеграмм-группу Инфостарт