Динамические данные формы

10.02.12

Разработка - Механизмы платформы 1С

В 1С можно создавать новые элементы управления. Но нельзя создавать для них новые реквизиты формы. Поэтому удобство работы с новыми элементами управления существенно ниже. Однако существует хитрый метод добавления любого количества реквизитов в форму.

Скачать файлы

Наименование Файл Версия Размер
down.zip
.zip 6,38Kb
21
.zip 6,38Kb 21 Скачать

 

Для этого используется объект Построитель. В форму добавляется единственный реквизит с типом построитель, назовем его, например, ДинамическиеДанные. В поле ДинамическиеДанные.Отбор можно добавлять любое число реквизитов, и использовать их в качестве данных для новых элементов управления. Реквизиты могут быть произвольного типа, причем содержать даже такие экзотические типы, как Форма или ЭлементУправления.

В обработке содержится небольшая библиотека функций, которая позволяет добавлять, удалять динамические реквизиты и использовать путь к ним.

В результате работы обработки в Поле2 проставляется путь к данным Данные1, ссылающимся на Поле1 через Форму, а в Поле3 и в Поле4 устанавливается одинаковый путь к данным Данные2. Соответственно, в Поле1 и Поле2, в Поле3 и Поле4 выводятся одинаковые данные.

Библиотека выглядит так:

//fixin 20081124
//Функция позволяет добавить новые данные в форму
Функция ДобавитьДинамическиеДанныеПоЗначению(Форма, ИмяРеквизитаДД = "ДинамическиеДанные", ИмяДанных, Значение) Экспорт
    
    //Определяем тип значения
    Т = ТипЗнч(Значение);
    МТ = Новый Массив();
    МТ.Добавить(Т);
    ОписаниеТипов = Новый ОписаниеТипов(МТ);
    ТекОтбор = ДобавитьДинамическиеДанныеПоТипу(Форма, ИмяРеквизитаДД, ИмяДанных, ОписаниеТипов);
    ТекОтбор.Значение = Значение;
    
    Возврат ТекОтбор;
    
КонецФункции

Функция ДобавитьДинамическиеДанныеПоТипу(Форма, ИмяРеквизитаДД = "ДинамическиеДанные", ИмяДанных, ОписаниеТипов) Экспорт
    
    //Сначала добавляем в поля
    ТекПоляПостроителя = Форма[ИмяРеквизитаДД].ДоступныеПоля;
    ТекПоле = ТекПоляПостроителя.Найти(ИмяДанных);
    Если ТекПоле <> Неопределено Тогда
        //Если поле есть, то его удаляем
        ТекПоляПостроителя.Удалить(ТекПоле);
    КонецЕсли;
    ТекПоле = ТекПоляПостроителя.Добавить(ИмяДанных, ИмяДанных, ОписаниеТипов);
    ТекПоле.Отбор = истина;
    
    //Затем добавляем в отбор
    ТекОтборПостроителя = Форма[ИмяРеквизитаДД].Отбор;
    ТекОтбор = ТекОтборПостроителя.Найти(ИмяДанных);
    Если ТекОтбор = Неопределено Тогда
        ТекОтбор = ТекОтборПостроителя.Добавить(ИмяДанных);
    КонецЕсли;
    
    Возврат ТекОтбор;
    
КонецФункции

//fixin 20081124
//Функция позволяет удалить добавленные новые данные в форме
Функция УдалитьДинамическиеДанные(Форма, ИмяРеквизитаДД = "ДинамическиеДанные", ИмяДанных) Экспорт
    
    //Сначала удаляем из построителя
    ТекОтборПостроителя = Форма[ИмяРеквизитаДД].Отбор;
    ТекОтбор = ТекОтборПостроителя.Найти(ИмяДанных);
    Если ТекОтбор <> Неопределено Тогда
        ТекОтборПостроителя.Удалить(ТекОтборПостроителя.Индекс(ТекОтбор));
    КонецЕсли;
    
    //Затем удаляем из доступных полей
    ТекПоляПостроителя = Форма[ИмяРеквизитаДД].ДоступныеПоля;
    ТекПоле = ТекПоляПостроителя.Найти(ИмяДанных);
    Если ТекПоле <> Неопределено Тогда
        ТекПоляПостроителя.Удалить(ТекПоле);
    КонецЕсли;
    
КонецФункции

//fixin 20081124
//Функция позволяет получить путь к новым данным в форме
Функция ПолучитьПутьДинамическихДанных(ИмяРеквизитаДД = "ДинамическиеДанные", ИмяДанных) Экспорт
    
    Возврат ИмяРеквизитаДД + ".Отбор." + ИмяДанных + ".Значение";
    
КонецФункции

См. также

Поинтегрируем: сервисы интеграции – новый стандарт или просто коннектор?

Обмен между базами 1C Администрирование СУБД Механизмы платформы 1С Платформа 1С v8.3 Бесплатно (free)

В платформе 8.3.17 появился замечательный механизм «Сервисы интеграции». Многие считают, что это просто коннектор 1С:Шины. Так ли это?

11.03.2024    3556    dsdred    48    

66

Как готовить и есть массивы

Механизмы платформы 1С Платформа 1С v8.3 Бесплатно (free)

Все мы используем массивы в своем коде. Это один из первых объектов, который дают ученикам при прохождении обучения программированию. Но умеем ли мы ими пользоваться? В этой статье я хочу показать все методы массива, а также некоторые фишки в работе с массивами.

24.01.2024    5031    YA_418728146    25    

62

Планы обмена VS История данных

Обмен между базами 1C Механизмы платформы 1С Платформа 1С v8.3 Бесплатно (free)

Вы все еще регистрируете изменения только на Планах обмена и Регистрах сведений?

11.12.2023    6160    dsdred    36    

110

1С-ная магия

Механизмы платформы 1С Бесплатно (free)

Язык программирования 1С содержит много нюансов и особенностей, которые могут приводить к неожиданным для разработчика результатам. Сталкиваясь с ними, программист начинает лучше понимать логику платформы, а значит, быстрее выявлять ошибки и видеть потенциальные узкие места своего кода там, где позже можно было бы ещё долго медитировать с отладчиком в поисках источника проблемы. Мы рассмотрим разные примеры поведения кода 1С. Разберём результаты выполнения и ответим на вопросы «Почему?», «Как же так?» и «Зачем нам это знать?». 

06.10.2023    18196    SeiOkami    46    

116

Дефрагментация и реиндексация после перехода на платформу 8.3.22

Механизмы платформы 1С Платформа 1С v8.3 Бесплатно (free)

Начиная с версии платформы 8.3.22 1С снимает стандартные блокировки БД на уровне страниц. Делаем рабочий скрипт, как раньше.

14.09.2023    11766    human_new    27    

72

Валидация JSON через XDTO (включая массивы)

WEB-интеграция Универсальные функции Механизмы платформы 1С Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

При работе с интеграциями рано или поздно придется столкнуться с получением JSON файлов. И, конечно же, жизнь заставит проверять файлы перед тем, как записывать данные в БД.

28.08.2023    8555    YA_418728146    6    

139

Внешние компоненты Native API на языке Rust - Просто!

Механизмы платформы 1С Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Внешние компоненты для 1С можно разработывать очень просто, пользуясь всеми преимуществами языка Rust - от безопасности и кроссплатформенности до удобного менеджера библиотек.

20.08.2023    6195    sebekerga    54    

93

Все скопируем и вставим! (Буфер обмена в 1С 8.3.24)

Механизмы платформы 1С Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Рассмотрим новую возможность 8.3.24 и как её можно эффективно использовать

27.06.2023    15524    SeiOkami    31    

103
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. Поручик 4670 10.02.12 10:36 Сейчас в теме
2. fixin 4252 10.02.12 10:57 Сейчас в теме
(1) ссори, некогда разукрашивать... хочу тег CODE от администрации
Оставьте свое сообщение