Converte uma string UTF-16 (16-bit Unicode Transformation Format) para a codificação CP1252.
Sintaxe
DecodeUtf16( < cText >, [ nEndian ] )
Parâmetros
Nome | Tipo | Descrição | Obrigatório | Referência |
|---|---|---|---|---|
cText | caractere | Indica a string UTF-16 que será convertida para o formato CP1252. | X |
|
nEndian | numérico | Indica o endianess do texto de entrada, podendo ser: 0 - Auto-Select (padrão), 1 - Big-Endian e 2 - Little-Endian. Caso nao seja especificado se é big-endian ou little-endian, a funcao verifica os primeiros bytes da sequencia, procurando o Byte Order Mark (BOM). Caso nao seja encontrado o BOM, a string é tratada como utf-16be ( big-endian ) |
|
|
Retorno
Nome | Tipo | Descrição |
|---|---|---|
cRet | caractere | Retorna uma nova string no formato CP1252. |
Exemplos
Exemplo 1
#define CRLF Chr(13) + Chr(10) //+----------------------------------------------------------------------------+ //|Exemplo de uso da função EncodeUTF16 e DecodeUTF16 | //+----------------------------------------------------------------------------+ User Function Exemplo4() Local cTexto := "" Local cEncodeUTF16 := "" Local cDecodeUTF16 := "" Local cMensagem := "" cTexto := "à noite, vovô kowalsky vê o ímã cair no pé do pingüim" cTexto += "queixoso e vovó põe açúcar no chá de tâmaras do jabuti feliz." cEncodeUTF16 := EncodeUTF16(cTexto) cDecodeUTF16 := DecodeUTF16(cEncodeUTF16) cMensagem := "Pangrama origem: [" + cTexto + "]" cMensagem1 := "Texto -> UTF16: [" + cEncodeUTF16 + "]" cMensagem2 := "UTF16 -> Texto: [" + cDecodeUTF16 + "]" MsgInfo(cMensagem, "Exemplo") MsgInfo(cMensagem1, "Exemplo") MsgInfo(cMensagem2, "Exemplo") Return
Abrangência
Microsiga Protheus 8.11 , Protheus 10, Protheus 11
Veja também
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas