|
Процедура Вставить(Картинка) Перем Л, В, П, Н; Док = Авто.Повреждения; Если ПустоеЗначение(Док) = 0 Тогда глФлагРасшифровки = 1; // Форму беру через внеш контекст, если что не так, то я чайник... глРасшифровка = ВзятьКонтекст(Контекст); С = СоздатьОбъект("СписокЗначений"); // С.ДобавитьЗначение("Форма", "Режим"); // С.ДобавитьЗначение(Авто, "Документ"); // ненужный параметр, типа вода ОткрытьФорму("Отчет#",С, КаталогИБ() + ПутьКобработкеОткудаНадоПолучитьКартинко; ВнешКонтекст = С; ФормаРасш = СоздатьОбъект("РасширениеФормы"); ФормаРасш.УстановитьФорму(ВнешКонтекст.Форма); АтрТекст = СоздатьОбъект("АтрибутФормы"); АтрТекст.УстановитьАтрибут(ВнешКонтекст.Форма, "МногострочнаяЧасть"); //под сомнением, картинка на форме, и в обработке вроде как к ней обращались. АтрТекст.ПолучитьКоординаты(Л, В, П, Н); Карт = ФормаРасш.ПолучитьКартинку(Л, В, П, Н); //сделал так, от безысходности ВнешКонтекст.Форма.Закрыть(); Картинка.УстановитьКартинку(Карт); //ФормаРасш.ПолучитьКартинку(Л, В, П, Н)); глФлагРасшифровки = 0; глРасшифровка = 0; КонецЕсли; КонецПроцедуры // ВставитьКартинку
Вот текст процедурки, котрая делает эту ошибку
|