(DataFlex) Decode Literal String

Decode a literal string. See Avoid Non-usascii Literal Strings in Source Code

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

Use ChilkatAx-win32.pkg

Procedure Test
    String s
    Handle hoSb
    Boolean iSuccess
    Handle hoGlob
    String s

    // It's best not to use non-usascii literal strings in source code.
    // Instead, use a binary encoded representation of the string.

    // This is the string "44ης Οδός, αρ.2" encoded as quoted-printable.
    // Use Chilkat's online tool to prepare encoded strings: Online Binary Encoder
    // Note: For strings that have very few us-ascii chars, it's better to use base64 encoding instead of quoted-printable.
    Move "44=CE=B7=CF=82 =CE=9F=CE=B4=CF=8C=CF=82, =CE=B1=CF=81.2" To s
    Get Create (RefClass(cComChilkatStringBuilder)) To hoSb
    If (Not(IsComObjectCreated(hoSb))) Begin
        Send CreateComObject of hoSb
    End
    Get ComAppendEncoded Of hoSb s "quoted-printable" To iSuccess

    // For programming languages where strings are exposed bytes, you can tell Chilkat globally
    // to give you the utf-8 byte representation.
    // For programming languages where strings are opaque objects, such as C#, it doesn't matter.
    Get Create (RefClass(cComChilkatGlobal)) To hoGlob
    If (Not(IsComObjectCreated(hoGlob))) Begin
        Send CreateComObject of hoGlob
    End
    Set ComDefaultUtf8 Of hoGlob To True

    Get ComGetAsString Of hoSb To s


End_Procedure