Bin2W

Bin2W ( < cString> ) --> nRet

(numerico)
• Retorna um valor numérico inteiro que representa o caractere informado.

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.

#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")