[r26]: / trunk / library / XmlControl / fbXmlControl / svnobj  Maximize  Restore  History

Download this file

4 lines (4 with data), 6.1 kB

Gx_lŸ!0…jüo6–@¿øA.ISystem.StringL{6f9dac99-8de1-4efc-8465-68ac443b7d08}SpecialFuncL{0db3d7bb-cde0-4416-9a7b-ce49a0124323}NoneImplementationL{3b83b776-fb25-43b8-99f2-3c507c9143fc}TextDocument	L{f3878285-8e4f-490b-bb1b-9acbb7eb04db}
TextLinesL{a5de0b0b-1cb5-4913-ac21-9d70293ec00d}Id
longTagTextInterfaceL{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}(*²Organizes parsing and composing of XML data. Data can be treated as STRING or Char Array.–Filebuffersize is default 4096 Byte and can be set via Gvl_Param_XmlControlUsage example:	VAR(		XML : XML_Control;l		Buffer: STRING(GVL_Param_XmlControl.udiMaxFileSize);		//or‚		Buffer: ARRAY [0..GVL_Param_XmlControl.udiMaxFileSize] OF CHAR;	END_VAR:	XML.pBuffer: = ADR (buffer);D	XML.LenBuffer: = SIZEOF (buffer);	 R- Add your own preffered fileheader like:!^XML: <?xml version=\"1.0\" encoding=\"UTF-8\"?>"	XML.writeDocumentHeader( '<?xml version=\"1.0\" encoding=\"UTF-8\"?>');#H- Composing a tag with a parameters:$<XML: <MyTag ParaName = "11" />%B	XML.newTag(sTagName: = 'MyTag');&f	XML.newPara(sName: = 'ParaName', sPara: = sValue);' 	XML.CloseTag();(- Tag value:):XML: <MyTag> MyText </ MyTag>*<	XML.newTag(sName := 'MyTag');+J	XML.newTagData(sTagData :='MyText');,N- Jump to the beginning of the XML data-(XML.toStartBuffer();.t- returns the next Tag from the current position in buffer/XML.NextTag();0B- Output the parameter of the Tag1BXML.nextPara(sPara: = LastValue);2`Feedback: sPara returns the value found (string)3*)4:{attribute 'hide_all_locals'}5jFUNCTION_BLOCK fbXmlControl IMPLEMENTS ITF_XmlControl6VAR7(	Buffer : strBuffer;8*	TagList : strBuffer;9"	sTags : STRING; :2	TagListSeek : strBuffer;;*	sTagsSeek : STRING; <"	Tag : strBuffer;=	sTag : STRING;> 	xTagOpen: BOOL;?"	iSelect : UDINT;@,	iSelectStart : UDINT;A(	iSelectEnd : UDINT;B4	iSelectStartPara : UDINT;C0	iSelectEndPara : UDINT;D2	iSelectTagClose : UDINT;E6	iSelectStartValue : UDINT;F2	iSelectEndValue : UDINT;G.	udiSearchPos : UDINT; HEND_VARI"UniqueIdGeneratorJ802KPOULevelLL{8e575c5b-1d37-49c6-941b-5c0ec7874787}MStandardN ChildObjectGuidsO8System.Collections.ArrayListP,AddAttributeSubsequentQboolÐÐ-ÐÐ	E
ÐÐ
­&ÚÐ-ÐÐ	E
JÐÐ
­ZÚÐ-ÐÐ
­[ÚÐ-ÐÐ
­]ÚÐ-ÐÐ
­^ÚÐ-ÐÐ
­_ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­aÚÐ-ÐÐ
­bÚÐ-ÐÐ
­cÚÐ-ÐÐ
­dÚÐ-ÐÐ
­eÚÐ-ÐÐ
­fÚÐ-ÐÐ
­gÚÐ-ÐÐ
­hÚÐ-ÐÐ
­iÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ÚÐ- ÐÐ
­ÚÐ-!ÐÐ
­ÚÐ-ÐÐ
­ÚÐ-"ÐÐ
­ÚÐ-ÐÐ
­jÚÐ-ÐÐ
­tÚÐ-#ÐÐ
­uÚÐ-$ÐÐ
­ÚÐ-ÐÐ
­wÚÐ-%ÐÐ
­xÚÐ-&ÐÐ
­yÚÐ-'ÐÐ
­!ÚÐ-ÐÐ
­{ÚÐ-ÐÐ
­|ÚÐ-(ÐÐ
­}ÚÐ-)ÐÐ
­ÚÐ-ÐÐ
­~ÚÐ-*ÐÐ
­ÚÐ-+ÐÐ
­€ÚÐ-'ÐÐ
­ÚÐ-ÐÐ
­‚ÚÐ-ÐÐ
­ƒÚÐ-,ÐÐ
­„ÚÐ--ÐÐ
­
ÚÐ-ÐÐ
­…ÚÐ-ÐÐ
­†ÚÐ-.ÐÐ
­‡ÚÐ-/ÐÐ
­ˆÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ŽÚÐ-0ÐÐ
­ÚÐ-1ÐÐ
­ÚÐ-2ÐÐ
­"ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­“ÚÐ-3ÐÐ
­ÚÐ-4ÐÐ
­ÎÚÐ-5ÐÐ
­ÖÚÐ-6ÐÐ
­×ÚÐ-7ÐÐ
­ØÚÐ-8ÐÐ
­ÙÚÐ-9ÐÐ
­ÛÚÐ-:ÐÐ
­ÜÚÐ-;ÐÐ
­ÞÚÐ-<ÐÐ
­ßÚÐ-=ÐÐ
­áÚÐ->ÐÐ
­âÚÐ-?ÐÐ
­ãÚÐ-@ÐÐ
­äÚÐ-AÐÐ
­åÚÐ-BÐÐ
­æÚÐ-CÐÐ
­çÚÐ-DÐÐ
­èÚÐ-EÐÐ
­éÚÐ-FÐÐ
­ëÚÐ-GÐÐ
­lÚÐ-HÐI-JÐKL-MNOÐPQ­