Собсно не отрабатывает код перехода на более нисший уровень
По структуре
<1>
<2>
<3>..</3>
</2>
</3>
Проходит функция
Процедура ПрочитатьТеги(ТипТега, Ф)
Ур = Ф.СвойстваТекущегоУзла.Уровень;
ТипТега = Ф.Спуститься();
Пока ТипТега = 1 Цикл
Объект = Ф.ТекущийЭлементВВидеОбъекта();
Значение = СокрЛП(Объект.Значение);
Сообщить(Ф.СвойстваТекущегоУзла.Имя + " " + Объект.Значение);
Если Объект.КоличествоПодчиненных() > 1 Тогда
ТипТега = Ф.Спуститься();
ПрочитатьТеги(ТипТега, Ф);
КонецЕсли;
ТипТега = ф.Следующий();
КонецЦикла;
КонецПроцедуры
Код не переходит на нижний уровень по команде Спуститься()
Всему виной функция текущийЭлементВВидеОбъекта() Если ее не использовать то все работает. Но как тогда понять, что у узла есть подчиненные.
Просто хотел все в таблицу значений запихать, а тут такая засада.
(1) Беда заключается в том, что в 77 нет возможности прочитать значение элемента не выбрав текущийЭлементВВидеОбъекта. А при применении этой функции программа перестает идти по структуре файла... И было бы все ничего...Как определить, что есть подчиненные уровни без того чтобы применять функцию ТекущийЭлементВВидеОбъекта
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший