Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Portuguese

Pagetitle
Bin2W
Bin2W

Função: Bin2W

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

Bin2W ( < cString> ) --> nRet

NomeTipoDescriçãoObrigatórioReferência
cStringCaracterIndica o caractere de dois bytes. X
    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")

Exemplo da função Bin2W
Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server