http://sfsys.ru/index.php?action=history&feed=atom&title=XML.Duplicate
XML.Duplicate - Revision history
2026-04-04T09:39:21Z
Revision history for this page on the wiki
MediaWiki 1.31.1
http://sfsys.ru/index.php?title=XML.Duplicate&diff=3960&oldid=prev
Admin: 1 revision imported
2021-06-28T07:06:22Z
<p>1 revision imported</p>
<table class="diff diff-contentalign-left" data-mw="interface">
<tr class="diff-title" lang="en">
<td colspan="1" style="background-color: #fff; color: #222; text-align: center;">← Older revision</td>
<td colspan="1" style="background-color: #fff; color: #222; text-align: center;">Revision as of 07:06, 28 June 2021</td>
</tr><tr><td colspan="2" class="diff-notice" lang="en"><div class="mw-diff-empty">(No difference)</div>
</td></tr></table>
Admin
http://sfsys.ru/index.php?title=XML.Duplicate&diff=3959&oldid=prev
1>Admin: /* Примеры */
2021-06-28T06:20:41Z
<p><span dir="auto"><span class="autocomment">Примеры</span></span></p>
<p><b>New page</b></p><div>{{infobox function<br />
|name=Duplicate<br />
|object=[[Объект XML]]<br />
|caption=Копирование объекта<br />
|type=1<br />
|status=2<br />
|db=0<br />
|visual=0}}<br />
{{HeadLinks|<br />
* [[Main_Page|Начальная страница]]<br />
* [[Общее_описание_языка|Общее описание]]<br />
* [[Объекты]]<br />
* [[Объект XML]]}}<br />
Функция используется совместно с объектом ветки XML и возвращает новый объект, позиционированный на ту же самую ветку, что и исходный.<br />
<br />
== Синтаксис ==<br />
<code><br />
{{Grey|XML.}}'''Duplicate'''():''<Объект, указывающий на ту же ветку, что и текущий (XMLBRANCH)>''<br />
</code><br />
<br />
==== Возвращаемое значение ====<br />
Возвращает объект ветки XML.<br />
<br />
== Примеры ==<br />
<pre><br />
//Рекурсивная функция вывода и обхода, выводятся только ветки без подчиненных веток<br />
Function ВывестиДеревоФайла(аВетка)<br />
//Сохраним для второго цикла<br />
бВетка:=?(аВетка=0,0,аВетка.Duplicate());<br />
<br />
//Если следующей ветки нет, переменная будет равна нулю<br />
While аВетка<>0 Do<br />
If аВетка.Count()=0 Then<br />
//Вывод имени ветки, значения и полного пути ветки<br />
Message(аВетка.FullName+?(аВетка.Value<>""," ---> """+аВетка.Value+"""")+", Путь: "+аВетка.Path);<br />
EndIf;<br />
аВетка:=аВетка.Next();<br />
EndDo;<br />
<br />
//Цикл с рекурсией<br />
While бВетка<>0 Do<br />
If бВетка.Count()>0 Then<br />
ВывестиДеревоФайла(аВетка.FirstChild());<br />
EndIf;<br />
бВетка:=бВетка.Next();<br />
EndDo;<br />
EndFunction<br />
<br />
аОб:=XML.create();<br />
Стр:=аОб.LoadFromFile("c:\file.xml",65001);<br />
If IsEmpty(Стр) Then<br />
//Вызов рекурсивного вывода дерева загруженного файла XML<br />
ВывестиДеревоФайла(аОб.FirstChild());<br />
Else<br />
Message("Найдены ошибки при загрузке файла:"+_NEWLINE+Стр);<br />
EndIf;<br />
</pre></div>
1>Admin