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