Имя: Пароль:
1C
 
Проблема_ОсновноеИзображение
0 Anzhi
 
20.09.07
15:06
Процедура ПоказатьОсновноеИзображение() Экспорт

Если мТекущееОсновноеИзображение = Неопределено Тогда
ЭлементыФормы.ОсновноеИзображение.Картинка = мПустаяКартинка;
Иначе
ЭлементыФормы.ОсновноеИзображение.Картинка = мТекущееОсновноеИзображение;
КонецЕсли;
   
КонецПроцедуры

Процедура ОсновноеИзображениеНажатие(Элемент)
   Если ЭтоНовый() Тогда
       Предупреждение("Необходимо записать сотрудника!");
       Возврат;
   КонецЕсли;
   
   ОткрытьФормуИзображения(ЭтаФорма, ОсновноеИзображение, Ссылка);

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

Что я делаю не так, у меня рис. не остается на форме (взаимствовала код из "Управление торговлей"
1 Anzhi
 
20.09.07
15:08
oops!!

тема для 1С:8.0
2 Лефмихалыч
 
20.09.07
15:08
(0) мТекущееОсновноеИзображение ты не меняешь ни где, а надо бы по логике вещей
3 Anzhi
 
20.09.07
18:45
Можно подробнее объяснить, я не совсем понимаю
4 Wladimir_spb
 
20.09.07
22:29
Если ориентироваться на УТ, то как минимум должна быть строчка

мТекущееОсновноеИзображение = ОсновноеИзображение.Хранилище.Получить();

ну и пара процедур...
5 Anzhi
 
21.09.07
13:31
// Процедура устанавливает в поле картинки основное изображение номенклатуры
//
Процедура ПоказатьОсновноеИзображение() Экспорт
   
       Если мТекущееОсновноеИзображение = Неопределено Тогда
           ЭлементыФормы.ОсновноеИзображение.Картинка = мПустаяКартинка;
       Иначе
           ЭлементыФормы.ОсновноеИзображение.Картинка = мТекущееОсновноеИзображение;
       КонецЕсли;
   
КонецПроцедуры // ПоказатьОсновноеИзображение()

Процедура ОсновноеИзображениеНажатие(Элемент)
   Если ЭтоНовый() Тогда
       Предупреждение("Необходимо записать сотрудника!");
       Возврат;
   КонецЕсли;    
   ОткрытьФормуИзображения(ЭтаФорма, ОсновноеИзображение, Ссылка);

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

Процедура ПриОткрытии()
   мТекущееОсновноеИзображение = ОсновноеИзображение.Хранилище.Получить();

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

Процедура ОбработкаВыбора(ЗначениеВыбора, Источник)
   Если НЕ ОсновноеИзображение = ЗначениеВыбора Тогда
           ОсновноеИзображение = ЗначениеВыбора;
       КонецЕсли;

       мТекущееОсновноеИзображение = ОсновноеИзображение.Хранилище.Получить();
       ПоказатьОсновноеИзображение();
КонецПроцедуры
6 Anzhi
 
21.09.07
14:29
в чем ошибка?
Поскажите пожалуйста
7 Anzhi
 
21.09.07
14:31
картинка у меня выбирается, но при открытии ее уже нет
8 Wladimir_spb
 
21.09.07
14:57
Процедуры типа ОбработкаВыбора, ОсновноеИзображениеНажатие и прочие привязаны к соответствующим событиям формы?
9 Hadgehogs
 
25.09.07
13:59
Возможно:

Процедура ПоказатьОсновноеИзображение() Экспорт
   
       Если мТекущееОсновноеИзображение = Неопределено Тогда
           ЭлементыФормы.ОсновноеИзображение.Картинка = мПустаяКартинка;
       Иначе
           ЭлементыФормы.ОсновноеИзображение.Картинка = НОВЫЙ КАРТИНКА(мТекущееОсновноеИзображение);
       КонецЕсли;
   
КонецПроцедуры // ПоказатьОсновноеИзображение()
10 Anzhi
 
27.09.07
15:52
С посдедней предложенной процедурой появляется ошибка:

{Справочник.Сотрудники.Форма.ФормаЭлемента(87)}: Ошибка при вызове конструктора (КАРТИНКА): Несоответствие типов (параметр номер "1")
           ЭлементыФормы.ОсновноеИзображение.Картинка = НОВЫЙ КАРТИНКА(мТекущееОсновноеИзображение);
11 Anzhi
 
27.09.07
17:09
как сделать так, чтобы картинка сохранилась?


Так?
Процедура ПриЗакрытии()

СохранитьЗначение("СправочникСсылка.ХранилищеДополнительнойИнформации", ЭлементыФормы.ОсновноеИзображение);

КонецПроцедуры
12 Wladimir_spb
 
27.09.07
22:27
(11) Точно не так.
Проверь (8)
13 Сюзи
 
27.09.07
22:49
(11)Попробуй узнать  тип мТекущееОсновноеИзображение
14 Anzhi
 
01.10.07
16:58
не получается сохранить
15 Wladimir_spb
 
01.10.07
22:58
Обидно...
Но на форуме только один телепат и тот бот. Ответь на вопросы/предложения (8,13) может что-нибудь прояснится...