(DataFlex) Decode 2-digit Hex Escaped

Demonstrates how to replace escaped us-ascii chars such as \x7b and \x22 with the chars.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Use ChilkatAx-win32.pkg

Procedure Test
    String s
    Handle hoSb
    Boolean iSuccess
    Integer iNumReplaced
    String sTemp1

    // We have the following string with some us-ascii chars escaped like this:
    Move "\x7b\x22responseContext\x22:\x7b\x22" To s

    // Note: The above escaping does not conform to any standard format (as far as I know).
    // Chilkat does not have anything to decode from the above.
    // However, we can 1st transform into a standard format, and then decode..

    // JSON escapes chars outside us-ascii like this:  "Hello, \ud83d\ude03!"
    // We can transform the above to this:  "\u007b\u0022responseContext\u0022:\u007b\u0022"
    // And then decode..

    Get Create (RefClass(cComChilkatStringBuilder)) To hoSb
    If (Not(IsComObjectCreated(hoSb))) Begin
        Send CreateComObject of hoSb
    End

    Get ComAppend Of hoSb s To iSuccess
    Get ComReplace Of hoSb "\x" "\u00" To iNumReplaced

    // Now decode from "json" escapes
    Get ComDecode Of hoSb "json" "utf-8" To iSuccess

    // Show the decoded string
    Get ComGetAsString Of hoSb To sTemp1
    Showln sTemp1

    // Here's the result: {"responseContext":{"


End_Procedure