По теме из базы знаний
- Создаем сайт ресторана на OneScript
- hsИнтегратор 3. Онлайновый обмен и удаленное исполнение функций по HTTP протоколу
- Потоковая предметная фотосъемка c удалением фона (Canon & Nikon)
- Что нам стоит бота построить? Нарисуем - будет жить! Графический конструктор телеграм-ботов/Telegram
- Интеграция Честный Знак и 1C: обмен и синхронизация с маркировками для УТ11,УНФ,КА2,ERP,Розница:Расширение для работы с СУЗ,ГИСМТ,СБИС,Эдо-Лайт
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Процедура КоманднаяПанель1ДобавитьИзображение(Кнопка)
Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
Диалог.Заголовок = "Şəkili təyin edin";
Диалог.ПредварительныйПросмотр = Истина;
Если Диалог.Выбрать() Тогда
Данные = Новый ДвоичныеДанные (Диалог.ПолноеИмяФайла);
Фото = Новый ХранилищеЗначения (Данные, Новый СжатиеДанных(9));
ИмяФайла = СтрЗаменить(Диалог.ПолноеИмяФайла, Диалог.Каталог, "");
Картинка2 = Фото.Получить();
НоваяКартинка = Новый Картинка(Картинка2);
ЭлементыФормы.ОсновноеИзображение.Картинка = НоваяКартинка;
Иначе
Сообщить ("Şəkil seçilmədi");
КонецЕсли;
КонецПроцедуры
Процедура ПриОткрытии()
КартинкаИзХранилища = Фото.Получить();
НоваяКартинка = Новый Картинка(КартинкаИзХранилища);
ЭлементыФормы.ОсновноеИзображение.Картинка = НоваяКартинка;
КонецПроцедуры
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот