TOTVSTEC

Árvore de páginas

Converte um caractere de 16 bits não sinalizado para um numérico.

Sintaxe

Bin2W( < cString > )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cString

caractere

Indica o caractere de dois bytes.

X

 

Retorno

Nome

Tipo

Descrição

nRet

numérico

Retorna um valor numérico inteiro que representa o caractere informado.

Observações

Os caracteres utilizados na linguagem ocupam somente um byte, sendo assim, retornamos um valor numérico para os dois primeiros caracteres de uma string informada através do parâmetro.

Exemplos

Exemplo 1
#DEFINE CRLF Chr(13)+Chr(10)
User Function Exemplo()
Local cMensagem := ""
//+----------------------------------------------------------------------------+
//|Exemplifica o uso da função Bin2W                                           |
//+----------------------------------------------------------------------------+
  cMensagem += cValToChar(Bin2W("A"))          + " = Bin2W(         'A')" + CRLF
  cMensagem += cValToChar(Bin2W("A" + Chr(0))) + " = Bin2W('A' + Chr(0))" + CRLF
  cMensagem += cValToChar(Bin2W("AB"))         + " = Bin2W(        'AB')" + CRLF
  cMensagem += cValToChar(Bin2W("ABC"))        + " = Bin2W(       'ABC')" + CRLF
//+----------------------------------------------------------------------------+
//|Apresenta uma mensagem com os resultados obtidos                            |
//+----------------------------------------------------------------------------+
Return MsgInfo(cMensagem, "Exemplo do Bin2W")

Resultado do Exemplo

Abrangência

Microsiga Protheus 8.11, Protheus 10, TOTVS Application Server 10, ByYou Application Server

Veja também

  • Sem rótulos