Имя: Пароль:
1C
1С v8
Сохранение и загрузка настроек управляемой формы
0 Vladislava-smile
 
06.03.18
19:00
функции сохранения написаны, работают:
&НаСервере
Процедура СохранитьНастройкиУФСписка(КомпоновщикНастроек, ЭтотОбъект, мТекущаяНастройка) Экспорт
    
    Если мТекущаяНастройка<>Неопределено Тогда
       СтруктураНастройки = мТекущаяНастройка;
    Иначе
        СтруктураНастройки = Новый Структура;
        СтруктураНастройки.Вставить("ИмяОбъекта", Строка(ЭтотОбъект));
        СтруктураНастройки.Вставить("НаименованиеНастройки", Неопределено);
        СтруктураНастройки.Вставить("ИспользоватьПриОткрытии", Ложь);
        СтруктураНастройки.Вставить("СохранятьАвтоматически", Ложь);
    КонецЕсли;

    СтруктураНастройки.Вставить("Пользователь", глЗначениеПеременной("глТекущийПользователь"));
    СохраненнаяНастройка = Новый ХранилищеЗначения(КомпоновщикНастроек.ПолучитьНастройки());
    СтруктураНастройки.Вставить("СохраненнаяНастройка", СохраненнаяНастройка);

    ВозвращаемаяСтруктура = УниверсальныеМеханизмы.СохранениеНастроек(СтруктураНастройки);

    Если ВозвращаемаяСтруктура <> Неопределено Тогда
        мТекущаяНастройка = ВозвращаемаяСтруктура;
    Иначе
        мТекущаяНастройка = СтруктураНастройки;
    КонецЕсли;
    
КонецПроцедуры

&НаСервере
Процедура ЗагрузитьНастройкиУФСписка(КомпоновщикНастроек, ЭтотОбъект, мТекущаяНастройка) Экспорт  
    
    СтруктураНастройки = Новый Структура;
    СтруктураНастройки.Вставить("Пользователь", глЗначениеПеременной("глТекущийПользователь"));
    СтруктураНастройки.Вставить("ИмяОбъекта", Строка(ЭтотОбъект));
    СтруктураНастройки.Вставить("НаименованиеНастройки", ?(мТекущаяНастройка = Неопределено, Неопределено, мТекущаяНастройка.НаименованиеНастройки));

    ВозвращаемаяСтруктура = УниверсальныеМеханизмы.ВосстановлениеНастроек(СтруктураНастройки);

    Если ВозвращаемаяСтруктура <> Неопределено Тогда
        мТекущаяНастройка = ВозвращаемаяСтруктура;
        КомпоновщикНастроек.ЗагрузитьНастройки(мТекущаяНастройка.СохраненнаяНастройка.Получить());
    КонецЕсли;

КонецПроцедуры

Но при открытии стандартной процедуры настроить список - я не вижу настройки, которые были сохранены, и которые уже работют с данными списка. Не понимаю в чем затык????
Проблемы невозможно решaть нa том же уровне компетентности, нa котором они возникaют. Альберт Эйнштейн