PureBasic

XML EmitCompact

See more XML Examples

Demonstrates the XML EmitCompact property to generate XML that is not pretty-printed, but is instead compact with whitespace removed.

Note: This example requires Chilkat v9.5.0.64 or later.

PureBasic

IncludeFile "CkXml.pb"

Procedure ChilkatExample()

    ; Note: This example requires Chilkat v9.5.0.64 or later.
    xml.i = CkXml::ckCreate()
    If xml.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    CkXml::setCkTag(xml, "aaa")
    CkXml::ckNewChild2(xml,"red|green|blue","sky")

    ; Show the XML in normal indented (pretty-printed) format:
    Debug CkXml::ckGetXml(xml)

    ; The output:

    ; 	<?xml version="1.0" encoding="utf-8" ?>
    ; 	<aaa>
    ; 	    <red>
    ; 	        <green>
    ; 	            <blue>sky</blue>
    ; 	        </green>
    ; 	    </red>
    ; 	</aaa>

    ; Now set the EmitCompact property.
    CkXml::setCkEmitCompact(xml, 1)

    ; Show the XML in compact form:
    Debug CkXml::ckGetXml(xml)

    ; The compact output:

    ; 	<?xml version="1.0" encoding="utf-8" ?>
    ; 	<aaa><red><green><blue>sky</blue></green></red></aaa>
    ; 


    CkXml::ckDispose(xml)


    ProcedureReturn
EndProcedure