|   |   | 
| 
 | Бывает панель, как "Главное" но полностью настраиваемая? | ☑ | ||
|---|---|---|---|---|
| 0
    
        arsik 13.08.24✎ 09:34 | 
        Избранное не очень удобно - Список не структурированный.
 А хотелось бы разбить его на части. 
 | |||
| 1
    
        Timon1405 13.08.24✎ 09:51 | 
        свой АРМ в режиме рабочего стола     | |||
| 2
    
        arsik 13.08.24✎ 09:55 | 
        Ну может готовое кто то видел. Нагуглить такое не могу     | |||
| 3
    
        Kigo_Kigo 13.08.24✎ 11:37 | 
        ОбщегоНазначенияКлиентПереопределяемый
 &После("ПриНачалеРаботыСистемы") Процедура ДоработкиУХ_ПриНачалеРаботыСистемы(Параметры) //ОбщегоНазначенияВызовСервера.Расш1_ПроверитьРольДоступна("inv_ВнесениеКонтрагентовИДоговоровWEB"); #Если ВебКлиент Тогда // Определяем "крыть" интерфейс или вернуть как было. //Если ОбщегоНазначенияВызовСервера.Расш1_ПроверитьРольДоступна("inv_ВнесениеКонтрагентовИДоговоровWEB") Тогда ОбновитьИнтерфейс = ОбщегоНазначенияВызовСервера.Расш1_ВыполнитьНастройкуПанелей(Ложь, Ложь); // КлиентскоеПриложение.УстановитьРежимОсновногоОкна(РежимОсновногоОкнаКлиентскогоПриложения.ВстроенноеРабочееМесто); ОткрытьФорму("Обработка.Inv_СтартРедактированиеКонтрагентовИДоговоров.Форма.ОсновнаяФорма"); //Иначе // //ОбновитьИнтерфейс = ОбщегоНазначенияВызовСервера.Расш1_ВыполнитьНастройкуПанелей(Ложь, Истина); //КонецЕсли; #Иначе ОбновитьИнтерфейс = ОбщегоНазначенияВызовСервера.Расш1_ВыполнитьНастройкуПанелей(Истина, Истина); #КонецЕсли Если ОбновитьИнтерфейс Тогда ОбновитьИнтерфейс(); КонецЕсли; КонецПроцедуры ОбщегоНазначенияВызовСервера Функция Расш1_ВыполнитьНастройкуПанелей(ПолучатьСоставИзХранилища=Ложь, ВосстановитьНастройкуПанелей=Ложь) Экспорт //Возврат Ложь; Если ТекущийРежимЗапуска() = Неопределено Тогда // Можно расширить условия на тип запуска и если не "тонкий, веб" то возврат. Возврат Ложь; КонецЕсли; УстановитьПривилегированныйРежим(Истина); Если ПолучатьСоставИзХранилища Тогда НастройкиИнтерфейса = ХранилищеСистемныхНастроек.Загрузить("Общее/НастройкиИнтерфейсаКлиентскогоПриложения"); Если НастройкиИнтерфейса = Неопределено Тогда НастройкиИнтерфейса = Новый НастройкиИнтерфейсаКлиентскогоПриложения; Иначе НастройкиСостава = НастройкиИнтерфейса.ПолучитьСостав(); // Состав не то, что в конфигураторе, а то, что пользователь установил себе. КонецЕсли; Иначе НастройкиИнтерфейса = Новый НастройкиИнтерфейсаКлиентскогоПриложения; НастройкиСостава = НастройкиИнтерфейса.ПолучитьСостав(); // С помощью пустого объекта настроек получим настройки состава, установленные в конфигураторе. КонецЕсли; Если НЕ ОбщегоНазначения.ЭтоВебКлиент() и НЕ ПолучатьСоставИзХранилища Тогда //Сохраним настройку панелей ХранилищеСистемныхНастроек.Сохранить("Общее/НастройкиИнтерфейсаКлиентскогоПриложения", , НастройкиИнтерфейса); // Поместим объект настроек текущему пользователю в хранилище. КонецЕсли; Если НЕ ВосстановитьНастройкуПанелей Тогда // Очищаем настройки состава. НастройкиСостава.Верх.Очистить(); НастройкиСостава.Лево.Очистить(); НастройкиСостава.Низ.Очистить(); НастройкиСостава.Право.Очистить(); // Добавлем панели интерфейса ГруппаНастройкиСостава = Новый ГруппаНастройкиСоставаИнтерфейсаКлиентскогоПриложения; ГруппаНастройкиСостава.Добавить(Новый ЭлементНастройкиСоставаИнтерфейсаКлиентскогоПриложения("ПанельИзбранного")); ГруппаНастройкиСостава.Добавить(Новый ЭлементНастройкиСоставаИнтерфейсаКлиентскогоПриложения("ПанельОткрытых")); НастройкиСостава.Верх.Добавить(ГруппаНастройкиСостава); //// Очищаем избранное //Избранное = ХранилищеСистемныхНастроек.Загрузить("Общее/ИзбранноеРаботыПользователя"); //Если Избранное = Неопределено Тогда // Избранное = Новый ИзбранноеРаботыПользователя; //КонецЕсли; //Пока Избранное.Количество() Цикл // Избранное.Удалить(0); //КонецЦикла; // //// Добавляем элементы в избранное //мНавигационныеСсылки = Новый Массив; //мНавигационныеСсылки.Добавить("e1cib/command/Справочник.Контрагенты.Команда.Контрагенты"); //мНавигационныеСсылки.Добавить("e1cib/command/Справочник.ДоговорыКонтрагентов.Команда.Договоры"); // //Для каждого тНвСсылка Из мНавигационныеСсылки Цикл // Элемент = Новый ЭлементИзбранногоРаботыПользователя; // Элемент.НавигационнаяСсылка = тНвСсылка; // Избранное.Добавить(Элемент); //КонецЦикла; // ХранилищеСистемныхНастроек.Сохранить("Общее/ИзбранноеРаботыПользователя", "", Избранное); КонецЕсли; НастройкиИнтерфейса.УстановитьСостав(НастройкиСостава); //ХранилищеСистемныхНастроек.Сохранить("Общее/НастройкиИнтерфейсаКлиентскогоПриложения", , НастройкиИнтерфейса); // Поместим объект настроек текущему пользователю в хранилище. Возврат Истина; КонецФункции | |||
| 4
    
        Kigo_Kigo 13.08.24✎ 11:49 | 
        думаю, сам разберешься     | |||
| 5
    
        Kigo_Kigo 13.08.24✎ 11:49 | 
        Удаляет все панели и возвращает их обратно, также можно накидать избранное самому в любом порядке     | |||
| 6
    
        arsik 13.08.24✎ 14:18 | 
        (4) Ничего не понятно. Как это выглядит?     | |||
| 7
    
        Kigo_Kigo 15.08.24✎ 16:54 | 
        что там не понятного, это делается в расширении для общих модулей, вызывается с дерективой "&После"     | 
| Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |