Diff of /trunk/library/XmlControl/FB_StringBuffer/Find/svnobj [000000] .. [r45]  Maximize  Restore

Switch to unified view

a b/trunk/library/XmlControl/FB_StringBuffer/Find/svnobj
1
Gx_l„!0…jüo   0ōŹłQ"O<
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
2
longTagText
udiLoop := 0;iSearch := 0;BpBuffer := pStrBuf + udiStartPos;>pSearch := ADR( sSearchString);|WHILE(pSearch^ <> 0 ) AND udiLoop + udiStartPos < udiLength DO@    IF pBuffer^ <> pSearch^ THEN>        udiLoop := udiLoop + 1;f        pBuffer := pStrBuf + udiStartPos + udiLoop;N        pSearch := ADR( sSearchString);*        iSearch := 0;    ELSE<        iSearch := iSearch +1;z        pBuffer := pStrBuf + udiStartPos + udiLoop + iSearch;d        pSearch := ADR( sSearchString ) + iSearch;    END_IF;END_WHILE;DFind := udiLoop + 1 + udiStartPos;Interface L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}!(* "~    Find a searchstring in the buffer and returns its position.#€    It's possible to add a preffered startposition within buffer$*)%&METHOD Find : UDINT&VAR_INPUT'6    sSearchString : STRING;(0    udiStartPos : UDINT;)END_VAR*VAR+(    udiLoop : UDINT;,(    iSearch : UDINT;-<    pBuffer : POINTER TO BYTE;.<    pSearch : POINTER TO BYTE;ÐÐÐEÐÐ   
3
­ÚÐ-
ÐÐ  
4
­ÚÐ-ÐÐ  
5
­ÚÐ-ÐÐ  
6
­ÚÐ-ÐÐ  
7
­ÚÐ-ÐÐ  
8
­ÚÐ-ÐÐ  
9
­   ÚÐ-ÐÐ    
10
­
11
ÚÐ-ÐÐ    
12
­ÚÐ-ÐÐ  
13
­ÚÐ-ÐÐ  
14
­
ÚÐ-ÐÐ    
15
­ÚÐ-ÐÐ  
16
­ÚÐ-ÐÐ  
17
­ÚÐ-ÐÐ  
18
­ÚÐ-ÐÐ  
19
­ÚÐ-ÐÐ  
20
­ÚÐ-ÐÐ  
21
­ÚÐ-ÐÐ  
22
­ÚÐ-Ð ÐEÐÐ    
23
­ÚÐ-!ÐÐ  
24
­ÚÐ-"ÐÐ  
25
­ÚÐ-#ÐÐ  
26
­ÚÐ-$ÐÐ  
27
­ÚÐ-%ÐÐ  
28
­ÚÐ-&ÐÐ  
29
­ÚÐ-'ÐÐ  
30
­ÚÐ-(ÐÐ  
31
­ÚÐ-)ÐÐ  
32
­ÚÐ-*ÐÐ  
33
­ ÚÐ-+ÐÐ  
34
­!ÚÐ-,ÐÐ  
35
­"ÚÐ--ÐÐ  
36
­#ÚÐ-.ÐÐ  
37
­ÚÐ-)