В начало

Загрузить фотографию

 

Процедура ЗагрузитьФотографию (Элемент)

            Режим = РежимДиалогаВыбораФайла.Открытие;

            ДиалогОткрытияФайла = Новый ДиалогВыбораФайла (Режим);

            ДиалогОткрытияФайла.ПолноеИмяФайла = "";

            Фильтр = "Текст (*,*)|*.*";

            ДиалогОткрытияФайла.Фильтр = Фильтр;

            ДиалогОткрытияФайла.МножественныйВыбор = Ложь;

            ДиалогОткрытияФайла.Заголовок = "Выберите картинку";

 

            Если ДиалогОткрытияФайла.Выбрать () Тогда

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

                        ЭлементХранилища = Новый ХранилищеЗначения (ВыбраннаяКартинка);

                        Фотография = ЭлементХранилища;

            КонецЕсли;

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