DataFlex

StringBuilder ReplaceBetween

Demonstrates the ReplaceBetween method. DataFlex

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoSb
    Boolean iSuccess
    Integer iNumReplacements
    String sTemp1

    Get Create (RefClass(cComChilkatStringBuilder)) To hoSb
    If (Not(IsComObjectCreated(hoSb))) Begin
        Send CreateComObject of hoSb
    End
    Get ComAppend Of hoSb "<company><industry>Software</industry><name>Chilkat Software</name><abc>Abc Software</abc><name>Xyz Software</name></company>" To iSuccess

    // The ReplaceBetween method restricts the replacements to only
    // the parts that occur between two delimiter strings.

    // For example:
    Get ComReplaceBetween Of hoSb "<name>" "</name>" "Software" "Technology" To iNumReplacements

    // The number of replacements should be 2.
    Showln "numReplacements = " iNumReplacements

    // The sb now contains:
    // <company><industry>Software</industry><name>Chilkat Technology</name><abc>Abc Software</abc><name>Xyz Technology</name></company>
    Get ComGetAsString Of hoSb To sTemp1
    Showln sTemp1


End_Procedure