Имя: Пароль:
1C
1С v8
Как поменять картинку кнопки командной панели на 8.3 на внешнюю?
0 gengineer
 
24.03.15
12:45
Загрузил картинку, есть ее внутренний адрес, но не понимаю как ее в командной панели применить на кнопку
1 gengineer
 
24.03.15
12:56
Кусок код

            ЭлементКнопка = Элементы.Добавить("ПерейтиНаСайт" + ОбъектСсылка.Код, Тип("КнопкаФормы"), ГруппаРодитель);
            Если ГруппаРодитель.Вид = ВидГруппыФормы.Подменю Тогда
                ЭлементКнопка.Вид = ВидКнопкиФормы.КнопкаКоманднойПанели;
            Иначе    
                ЭлементКнопка.Вид = ВидКнопкиФормы.ОбычнаяКнопка;
            КонецЕсли;    
            
            лКоманда = Команды.Добавить("ПерейтиНаСайт"+ОбъектСсылка.Код);
            лКоманда.Действие = "ПерейтиНаСайт";
            
            лКартинка = РаботаСФайлами.ПолучитьОсновноеИзображениеОбъекта(ОбъектСсылка);
            Попытка
                лКоманда.Картинка = лКартинка; // для внешней картинки, загруженной в базу, - внутренний адрес
            Исключение
                лКоманда.Картинка = БиблиотекаКартинок.СкачатьОбновить;    
            КонецПопытки;    
                    
            ЭлементКнопка.ИмяКоманды = лКоманда.Имя;
            ЭлементКнопка.Отображение = ОтображениеКнопки.КартинкаИТекст;
            ЭлементКнопка.Заголовок = ОбъектСсылка.Наименование;