Уведомления
Очистить все

1С Как сохранить фотографию сотрудника в справочнике "Сотрудники"?

1 Записи
1 Пользователи
0 Likes
301 Просмотры
158-150 Okolokompa Форум
(@mitozzz)
Trusted Member
Присоединился: 4 года назад
Записи: 32
Создатель темы  
Процедура ЗагрузитьФотографию(Элемент) 

Режим = РежимДиалогаВыбораФайла.Открытие; 
ДиалогОткрытияФайла = Новый ДиалогВыбораФайла(Режим); 
ДиалогОткрытияФайла.ПолноеИмяФайла = ""; 
Фильтр = "Текст (*,*)|*.*"; 
ДиалогОткрытияФайла.Фильтр = Фильтр; 
ДиалогОткрытияФайла.МножественныйВыбор = Ложь; 
ДиалогОткрытияФайла.Заголовок = "Выберите картинку"; 

Если ДиалогОткрытияФайла.Выбрать() Тогда 
ВыбраннаяКартинка = Новый Картинка(ДиалогОткрытияФайла.ПолноеИмяФайла); 
ЭлементХранилища = Новый ХранилищеЗначения(ВыбраннаяКартинка); 
Фотография = ЭлементХранилища; 
КонецЕсли; 

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


ВыбФайл = Новый ДвоичныеДанные(ДиалогОткрытияФайла.ПолноеИмяФайла); 
элХранилища = Новый ХранилищеЗначения(ВыбФайл); 
Фотография = элХранилища;

   
Цитата
Поделиться: