Tcl

HasChildWithTag using a Tag Path

Demonstrates calling HasChildWithTag with a tag path. Tcl

load ./chilkat.dll

set xml [new_CkXml]

CkXml_put_Tag $xml "world"

CkXml_NewChild2 $xml "north_america|united_states|california|san_francisco" "Silicon Valley"
CkXml_NewChild2 $xml "north_america|united_states|california|san_diego" "Birthplace of California"
CkXml_NewChild2 $xml "north_america|united_states|illinois|chicago" "Windy City"

puts [CkXml_getXml $xml]

# Produces the following XML
# 
# 	<?xml version="1.0" encoding="utf-8" ?>
# 	<world>
# 	    <north_america>
# 	        <united_states>
# 	            <california>
# 	                <san_francisco>Silicon Valley</san_francisco>
# 	                <san_diego>Birthplace of California</san_diego>
# 	            </california>
# 	            <illinois>
# 	                <chicago>Windy City</chicago>
# 	            </illinois>
# 	        </united_states>
# 	    </north_america>
# 	</world>
# 

set hasChicago [CkXml_HasChildWithTag $xml "north_america|united_states|illinois|chicago"]
puts "hasChicago = $hasChicago"

set hasNaperville [CkXml_HasChildWithTag $xml "north_america|united_states|illinois|naperville"]
puts "hasNaperville = $hasNaperville"

set hasIllinois [CkXml_HasChildWithTag $xml "north_america|united_states|illinois"]
puts "hasIllinois = $hasIllinois"

delete_CkXml $xml