Края ячейки при выводе картинок на СКД

Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)
	
	СтандартнаяОбработка = Ложь;
	
	НастройкиКомпоновки = КомпоновщикНастроек.ПолучитьНастройки();
	
	КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
	МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, НастройкиКомпоновки, ДанныеРасшифровки);
	
	ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
	ПроцессорКомпоновки.Инициализировать(МакетКомпоновки, , ДанныеРасшифровки);
	
	ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
	ПроцессорВывода.УстановитьДокумент(ДокументРезультат);
	ПроцессорВывода.Вывести(ПроцессорКомпоновки);
	
	
	Для ТекущаяСтрока = 1 По ДокументРезультат.ВысотаТаблицы Цикл
		
		Для ТекущаяКолонка = 1 По ДокументРезультат.ШиринаТаблицы Цикл
			
			ТекущаяОбласть = ДокументРезультат.Область(ТекущаяСтрока, ТекущаяКолонка);
			ТекущаяРасшифровка = ТекущаяОбласть.Расшифровка;
			
			Если ТипЗнч(ТекущаяРасшифровка) = Тип("ИдентификаторРасшифровкиКомпоновкиДанных") Тогда
				
				ПоляРасшифровки = ДанныеРасшифровки.Элементы.Получить(ТекущаяРасшифровка).ПолучитьПоля();
				ПолеКартинки = ПоляРасшифровки.Найти("Фото");
				
				Если ТипЗнч(ПолеКартинки) = Тип("ЗначениеПоляРасшифровкиКомпоновкиДанных") Тогда
					
					ФайлКартинки = ПолеКартинки.Значение;
					
					Если ТипЗнч(ФайлКартинки) = Тип("ХранилищеЗначения") Тогда
						Если ЗначениеЗаполнено(ФайлКартинки.Получить()) Тогда 
							КартинкаВДокументе = ДокументРезультат.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
							КартинкаВДокументе.Картинка = Новый Картинка(ФайлКартинки.Получить());
							ТекущаяОбласть.ВысотаСтроки = 80;
							//КартинкаВДокументе.Линия = Новый Линия(ТипЛинииРисункаТабличногоДокумента.НетЛинии);
							КартинкаВДокументе.Расположить(ТекущаяОбласть);
						Иначе
							ТекущаяОбласть.Текст = "";
							ТекущаяОбласть.ВысотаСтроки = 10;
						КонецЕсли;
					КонецЕсли;
					
				КонецЕсли;
				
			КонецЕсли;
			
		КонецЦикла;
		
	КонецЦикла; 
	
	ДокументРезультат.АвтоМасштаб = Истина;
	
КонецПроцедуры