Visual FoxPro

StringBuilder GetAfterFinal

Demonstrates the StringBuilder.GetAfterFinal method.

The GetBefore method was added in Chilkat v9.5.0.77

Visual FoxPro

LOCAL lnSuccess
LOCAL loSb
LOCAL lnRemoveFlag
LOCAL lcMarker
LOCAL lcSubstr

lnSuccess = 0

loSb = CreateObject('Chilkat.StringBuilder')
lnSuccess = loSb.Append("111--222--333--444")

* The GetAfterFinal method returns the contents of the string after the final occurrence of
* the marker string.  If the remove flag is 1, then both the returned string AND
* the marker are removed.

* If the marker is not found, then the entire string is returned and the sb is cleared.
lnRemoveFlag = 1
lcMarker = "--"

DO WHILE (loSb.Length > 0)
    lcSubstr = loSb.GetAfterFinal(lcMarker,lnRemoveFlag)
    ? "substr = " + lcSubstr + ", sb contains: " + loSb.GetAsString()
ENDDO

* Output:
* substr = 444, sb contains: 111--222--333
* substr = 333, sb contains: 111--222
* substr = 222, sb contains: 111
* substr = 111, sb contains: 
* 

RELEASE loSb