Bin2W

Bin2W ( < cString> ) --> nRet

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