Имя: Пароль:
1C
1С v8
Вывести фото в отчете.
0 ЗлаяЗая
 
13.03.19
11:07
ЗУП 3.1.9.107
Делаю внешнюю печатную форму. Нужно вывести фото сотрудника.
    Фото = РегистрыСведений.ФотографииФизическихЛиц.СоздатьМенеджерЗаписи();
    Фото.ФизическоеЛицо = т.ФизическоеЛицо;
    Фото.Прочитать();
    Картинка=Фото.Фотография;
    
    Рисунок = ОбластьЗаголовок.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
    Рисунок.Верх = 15;
    Рисунок.Высота = 32;
    Рисунок.Ширина = 24;
    Рисунок.Лево = 47;
    Рисунок.РазмерКартинки = РазмерКартинки.АвтоРазмер;

    Рисунок.Картинка =  Картинка;

ругается "Несоответствие типов".
1 Ёпрст
 
13.03.19
11:12
(0) Плучить()
2 Ёпрст
 
13.03.19
11:12
Получить()
3 Ёпрст
 
13.03.19
11:13
Ну и СоздатьМенеджерЗаписи.. это пять
4 ЗлаяЗая
 
13.03.19
11:13
(2) : Метод объекта не обнаружен (Получить)
5 Ёпрст
 
13.03.19
11:14
Картинка=Фото.Фотография.Получить();
6 sqr4
 
13.03.19
11:14
ФОТО!!!
7 Ёпрст
 
13.03.19
11:16
(4) Рисунок.Картинка = Новый Картинка(Фото.Фотография.Получить());
8 ЗлаяЗая
 
13.03.19
11:19
теперь не ругается, но и не выводит фото
9 Ёпрст
 
13.03.19
11:22
(8) в тыоём регистре сведений, Фотография, какой тип имеет ? Хранилище значений ?
10 ЗлаяЗая
 
13.03.19
11:23
(9) да
11 Ёпрст
 
13.03.19
11:24
(10) есть уверенность, что там не пусто ?
ОбластьЗаголовок, надеюсь не до кода в (0) выводишь ?
12 ЗлаяЗая
 
13.03.19
11:27
(11) не пусто.
    ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
    
    ОбластьЗаголовок.Параметры............
        
    Рисунок ..........
    Рисунок.Картинка = Новый Картинка(Фото.Фотография.Получить());
    Рисунок.Линия = Новый Линия(ТипЛинииРисункаТабличногоДокумента.Сплошная,);
    
    ТабДок.Вывести(ОбластьЗаголовок);
13 Ёпрст
 
13.03.19
11:33
(12) в регистре сведений ФотографииФизическихЛиц, сколько измерений и какие они ?
14 ЗлаяЗая
 
13.03.19
11:34
(13) измерение одно- ФизическоеЛицо
15 sqr4
 
13.03.19
11:36
(3) Это десятка)
а в хранилище то что лежит, какого типа значение?
16 Ёпрст
 
13.03.19
11:38
(14) в выведенной таблице, поле картинки хоть появилось ? Только пустое ?
17 ЗлаяЗая
 
13.03.19
11:39
(16) да, рамка есть
18 El_Duke
 
гуру
13.03.19
11:39
(8) Это карма
Вы не смогли вывести свое фото в профиль - почему же вы думаете что Вселенная позволит вам вывести чужие фото в отчет ?
19 ЗлаяЗая
 
13.03.19
11:39
(15) а как это посмотреть?
Сильно не пинайте :)))) Стаж маленький.
20 SleepyHead
 
гуру
13.03.19
11:51
(19) Ну эти оборжать могут )) ВОт у меня так работает, надо анализировать, что хранится в хранилище значения - готовая картинка или просто двоичные данные

        // вывод фотографии сотрудника в рисунок D1
        Запись = РегистрыСведений.ФотографииФизическихЛиц.СоздатьМенеджерЗаписи();
        Запись.ФизическоеЛицо = Выборка.ФизическоеЛицо;
        Запись.Прочитать();
        Если Запись.Выбран() Тогда
            мФотография = Запись.Фотография.Получить();
            Если ТипЗнч(мФотография)=Тип("Картинка") Тогда
                Обл.Рисунки.D1.Картинка =  мФотография;
            Иначе
                Обл.Рисунки.D1.Картинка =  Новый Картинка(мФотография);
            КонецЕсли;
        КонецЕсли;
21 ЗлаяЗая
 
13.03.19
12:09
ну и чего надо моим "СоздатьМенеджерЗаписи" глумились? :)
А как узнать, что в хранилище? Стандартный регистр ЗУП
22 sqr4
 
13.03.19
12:11
чЕтАМ = Фото.Фотография.Получить();
Сообщить(типЗнч(чеТам))
23 ЗлаяЗая
 
13.03.19
12:18
(22) опа! там "не определено"
24 bodri
 
13.03.19
12:38
(21)
РегистрСведенийМенеджер.<Имя регистра сведений> (InformationRegisterManager.<Имя регистра сведений>)
СоздатьМенеджерЗаписи (CreateRecordManager)
Синтаксис:

СоздатьМенеджерЗаписи()
Возвращаемое значение:

Тип: РегистрСведенийМенеджерЗаписи.<Имя регистра сведений>.

Описание:

Создает объект для управления записью регистра сведений.

Доступность:

Сервер, толстый клиент, внешнее соединение, мобильное приложение(сервер).


////////////////////////////////////////////////
!!!а надо всего лишь прочитать
25 sqr4
 
13.03.19
12:44
(23) Фотку в учетку залевай, а то и тут НЕОПРЕДЕЛЕНО
26 ЗлаяЗая
 
13.03.19
13:11
(20) так сделала
спасибо всем откликнувшимся
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший