Имя: Пароль:
1C
1С v8
обойти дерево и развернутые элементы записать в массив
0 pele
 
16.08.12
13:28
&НаКлиенте
Процедура  ДобавитьРазвернутыеУровни(Массив)
   
   Массив = Новый Массив;
   //ЭлементыДерева = СписокЗадачОтМеня.ПолучитьЭлементы();
   //

   Для Каждого Строка Из Элементы.СписокЗадачОтМеня.ТекущиеДанные.Ссылка Цикл
   
           Если Элементы.СписокЗадачОтМеня.Развернут(Строка) = Истина Тогда
            Массив.Добавить(Строка);
        КонецЕсли;
       
       КонецЦикла;
   
   
   
   
         
КонецПроцедуры
1 pele
 
16.08.12
13:29
Помогите!
2 H A D G E H O G s
 
16.08.12
13:37
Задача какая?
3 YHVVH
 
16.08.12
13:39
рекурсией обойти все дерево можно
4 pele
 
16.08.12
13:45
мне не нужно все дерево мне только узлы и определить свернутые или нет
5 Alex S D
 
16.08.12
13:49
см (3)