пятница, 12 февраля 2016 г.

Удалить область поля табличного документа. 


МассивУдаляемых = Новый Массив;
Тд = ЭлементыФормы.ПолеТабличногоДокумента1;
Для сч = 1 По Тд.ВысотаТаблицы Цикл
 СтрИмяПользователя = Тд.Область(сч,1).Текст;
 СтрУи = Тд.Область(сч,2).Текст;
 Н = ТзРабочихПольз.НайтиСтроки(Новый Структура("Уи",СтрУи));
 Если Н.Количество() = 0 Тогда    
  Тд.Область(сч,1).Текст = "";
  Тд.Область(сч,2).Текст = "";   
  МассивУдаляемых.Добавить(сч);
 КонецЕсли;
КонецЦикла;

Для сч_ = 0 по МассивУдаляемых.Количество()-1 Цикл
 врем = (МассивУдаляемых.Количество()-1) - сч_;
 сч = МассивУдаляемых[врем];
 ТД.УдалитьОбласть(Тд.Область(сч,1,сч,Тд.ШиринаТаблицы), ТипСмещенияТабличногоДокумента.ПоВертикали);
КонецЦикла;
Ярлыки: ,