delphi xe7下面编写的格式化xml文件的demo。 可将FormatMyXML函数拷贝到其它版本使用。