DataFlex

StringBuilder Encode

Demonstrates the Chilkat StringBuilder Encode method. DataFlex

Use ChilkatAx-win32.pkg

Procedure Test
    String s
    Handle hoSb
    Boolean iSuccess
    String sTemp1

    Move "The quick brown fox jumps over the lazy dog" To s

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

    Get ComAppend Of hoSb s To iSuccess

    // output: The quick brown fox jumps over the lazy dog
    Get ComGetAsString Of hoSb To sTemp1
    Showln sTemp1

    Get ComEncode Of hoSb "base64" "utf-8" To iSuccess

    // output: VGhlIHF1aWNrIGJyb3duIGZveCBqdW1wcyBvdmVyIHRoZSBsYXp5IGRvZw==
    Get ComGetAsString Of hoSb To sTemp1
    Showln sTemp1

    Get ComDecode Of hoSb "base64" "utf-8" To iSuccess
    // output: The quick brown fox jumps over the lazy dog
    Get ComGetAsString Of hoSb To sTemp1
    Showln sTemp1

    // Now encode to hex..
    Get ComEncode Of hoSb "hex" "utf-8" To iSuccess
    // output: 54686520717569636B2062726F776E20666F78206A756D7073206F76657220746865206C617A7920646F67
    Get ComGetAsString Of hoSb To sTemp1
    Showln sTemp1

    Get ComDecode Of hoSb "hex" "utf-8" To iSuccess
    // URL encode
    Get ComEncode Of hoSb "url" "utf-8" To iSuccess
    Get ComGetAsString Of hoSb To sTemp1
    Showln sTemp1

    Get ComDecode Of hoSb "url" "utf-8" To iSuccess
    // base64url
    Get ComEncode Of hoSb "base64url" "utf-8" To iSuccess
    Get ComGetAsString Of hoSb To sTemp1
    Showln sTemp1

    // other possible encodings include modbase64, base32, base58, quoted-printable, url_rfc1738, url_rfc2396, url_rfc3986, and fingerprint


End_Procedure