TOTVSTEC

Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

Versão 1 Próxima »

Converte o encoding the um determinado tipo de conjunto de caracteres, fornecido pela a string sInput por referência, para um outro formato.

Parâmetro,,TipoObrigatórioReferênciaDescrição
sInputCXXString de entrada para ser convertida, passada por referência, sendo esta a ser convertida para o formato desejado
sEncodingInputCX
String Encoding de entrada da string no primeiro parâmetro
sEncodingOutputCX
String Encoding de saída da string para ser convertido

Exemplo

User Function Exemplo_ConvertEncoding

  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."
  cEncodeUTF8 := cTexto
  
  oUni1 := tUnicode():New()
  local rc1 := oUni1:ConvertEncoding( cEncodeUTF8, 'cp1252', 'utf-8' )
  cDecodeUTF8 := cEncodeUTF8
  local rc2 := oUni1:ConvertEncoding( cDecodeUTF8, 'utf-8', 'cp1252' )

  cMensagem := "Pangrama origem: [" + cTexto + "]"
  cMensagem += CRLF + "Texto -> UTF8: [" + cEncodeUTF8 + "]"
  cMensagem += CRLF + "UTF8 -> Texto: [" + cDecodeUTF8 + "]"

  ConOut(cMensagem)

Return
  • Sem rótulos