Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: binary and image files updated

...

Portuguese

Pagetitle
Bin2Str
Bin2Str

Função: Bin2Str

Converte uma string com caracteres para uma string com o valor binário de cada caractere.

Bin2Str ( < cString> ) --> cRet

NomeTipoDescriçãoObrigatórioReferência
cStringCaracterIndica a string que será convertida. X
    cRet(caracter)
  • Retorna uma string formatada de acordo com a string informada.

A string retornada possui o valor binário da string informada em que os espaços em branco " " correspondem ao 0 e o "x" minúsculo corresponde ao 1.

Exemplo:

cString  Bin2Str(cString)  Binário correspondente
"A""  x     x"01000001
"AB"" x     x x    x "
 0100000101000010
"ABC"
  " x     x x    x  x    xx"
  010000010100001001000011

 

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

Exemplo da função Bin2Str
Image Removed Image Added
Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server