Имя: Пароль:
1C
1С v8
1с программно удалить Панель разделов
0 andrey i1c
 
14.08.20
23:27
пытаюсь программно удалить панель разделов при запуске программы У ПОЛЬЗОВАТЕЛЯ кто запускает программу, но почему то не срабатывает:

Процедура ПриНачалеРаботыСистемы()
    РаботаСИнтерфейсом.МинимальныйИнтерфейс();
    ОбновитьИнтерфейс();
КонецПроцедуры

Процедура МинимальныйИнтерфейс() Экспорт
    Настройки = Новый НастройкиИнтерфейсаКлиентскогоПриложения;
    НастройкиСостава = Новый НастройкиСоставаИнтерфейсаКлиентскогоПриложения;
    НастройкиСостава.Верх.Добавить(Новый ЭлементНастройкиСоставаИнтерфейсаКлиентскогоПриложения("ПанельОткрытых"));
    Настройки.УстановитьСостав(НастройкиСостава);
    ХранилищеСистемныхНастроек.Сохранить("Общее/НастройкиИнтерфейсаКлиентскогоПриложения", "", Настройки);
КонецПроцедуры


ТАК ЖЕ ПРОБОВАЛ И ЭТОТ КОД, НО БЕЗУСПЕШНО:

НастройкиИнтерфейса = Новый НастройкиИнтерфейсаКлиентскогоПриложения;
    НастройкиСостава = НастройкиИнтерфейса.ПолучитьСостав();
    
    // Очистить настройки состава.

    НастройкиСостава.Верх.Очистить();
    НастройкиСостава.Лево.Очистить();
    НастройкиСостава.Низ.Очистить();
    НастройкиСостава.Право.Очистить();
    
    //Добавить снизу панель открытых

    НастройкиСостава.Низ.Добавить(Новый ЭлементНастройкиСоставаИнтерфейсаКлиентскогоПриложения("ПанельОткрытых"));
        
    // Загрузить настройки состава в пустой объект настроек.

    НастройкиИнтерфейса.УстановитьСостав(НастройкиСостава);
    
    // Положить объект настроек текущему пользователю в хранилище.

    ХранилищеСистемныхНастроек.Сохранить("Общее/НастройкиИнтерфейсаКлиентскогоПриложения", , НастройкиИнтерфейса);

В ЧЕМ МОЖЕТ БЫТЬ ПРИЧИНА?
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.