[r19]: / trunk / library / XmlControl / strBuffer / FindBack / svnobj  Maximize  Restore  History

Download this file

34 lines (34 with data), 2.7 kB

Gx_l_
!0…jüoFcY>ÒñJx‘System.StringL{f8a58466-d7f6-439f-bbb8-d4600e41d099}ImplementationL{3b83b776-fb25-43b8-99f2-3c507c9143fc}TextDocumentL{f3878285-8e4f-490b-bb1b-9acbb7eb04db}TextLinesL{a5de0b0b-1cb5-4913-ac21-9d70293ec00d}	Id
longTagText
udiLoop := 0;udiSearch := 0;>pBuffer := pString + udiLenght;>pSearch := ADR( sSearchString);`WHILE(pSearch^ <> 0 ) AND udiLoop < udiLenght DO:	IF pBuffer^ <> pSearch^ THEN2		udiLoop := udiLoop + 1;V		pBuffer := pString + udiLenght - udiLoop;B		pSearch := ADR( sSearchString);"		udiSearch := 0;
	ELSE8		udiSearch := udiSearch +1;n		pBuffer := pString + udiLenght - udiLoop + udiSearch;\		pSearch := ADR( sSearchString ) + udiSearch;	END_IF;END_WHILE;JFindBack :=  udiLenght - udiLoop + 1;Interface L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}!.METHOD FindBack : UDINT"VAR_INPUT#0	sSearchString : STRING;$END_VAR%VAR&"	udiLoop : UDINT;'&	udiSearch : UDINT;(6	pBuffer : POINTER TO BYTE;)6	pSearch : POINTER TO BYTE;ÐÐÐEÐÐ	
­aÚÐ-
ÐÐ	
­bÚÐ-ÐÐ	
­cÚÐ-ÐÐ	
­dÚÐ-ÐÐ	
­eÚÐ-ÐÐ	
­fÚÐ-ÐÐ	
­gÚÐ-ÐÐ	
­hÚÐ-ÐÐ	
­iÚÐ-ÐÐ	
­jÚÐ-ÐÐ	
­kÚÐ-ÐÐ	
­lÚÐ-ÐÐ	
­mÚÐ-ÐÐ	
­nÚÐ-ÐÐ	
­oÚÐ-ÐÐ	
­pÚÐ-ÐÐ	
­qÚÐ-ÐÐ	
­rÚÐ-ÐÐ	
­ÚÐ-Ð ÐEÐÐ	
­WÚÐ-!ÐÐ	
­XÚÐ-"ÐÐ	
­YÚÐ-#ÐÐ	
­ZÚÐ-$ÐÐ	
­[ÚÐ-%ÐÐ	
­\ÚÐ-&ÐÐ	
­]ÚÐ-'ÐÐ	
­^ÚÐ-(ÐÐ	
­_ÚÐ-)ÐÐ	
­`ÚÐ-$ÐÐ	
­ÚÐ-