Add suport for read/write Attributes

::revision 02 - 23/February/2013

NEW Add suport for read/write Attributes
NEW function GetAttrs(query: string): string;
NEW function GetAttrValueByName(query: string; attrName: string)
NEW procedure SetAttribute(query: string)
NEW Add    AppDemo3