Descrição
(CARACTER) STR2BIN - Converte Valor Caracter para Binário.
|
Sintaxe
Parâmetros
| Par |
Nome |
Tipo |
Descrição |
Default |
Obg |
Ref |
01
|
cValor |
Caracter |
Valor a Converter |
|
X |
|
Retorno
| Retorno |
Tipo |
Descrição |
| nRet |
Numérico
|
Resultado da Conversão
|
Exemplo
#INCLUDE "TOTVS.CH"
User Function Str2Bin()
Local cValor := 'UniversoADVPL'
MsgInfo( 'Valor: ' + cValtoChar(cValor) + CRLF + 'Retorno: ' + cValtoChar( Str2Bin( cValor ) ), 'UniversoADVPL' )
cValor := " x x x x x xx"
MsgInfo( 'Valor: ' + cValtoChar(cValor) + CRLF + 'Retorno: ' + cValtoChar( Str2Bin( cValor ) ), 'UniversoADVPL' )
cValor := " x x x x "
MsgInfo( 'Valor: ' + cValtoChar(cValor) + CRLF + 'Retorno: ' + cValtoChar( Str2Bin( cValor ) ), 'UniversoADVPL' )
cValor := "x"
MsgInfo( 'Valor: ' + cValtoChar(cValor) + CRLF + 'Retorno: ' + cValtoChar( Str2Bin( cValor ) ), 'UniversoADVPL' )
Return( Nil )
Resultado
Exemplo adicionais
|
01
|
Str2Bin("x")
|
|
02
|
Str2Bin(" x x x x x xx")
|
|
X
|
1
|
|
Vazio
|
0
|
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
