TsdXmlNodeEvent = procedure (Sender: TObject; ANode: TXmlNode) of object;