Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

Versão 1 Próxima »

Função: I2Bin

Converte um número inteiro em uma string formatada como um inteiro de 16 bits.

I2Bin ( < nInteiro> ) --> cRet

NomeTipoDescriçãoObrigatórioReferência
nInteiroNuméricoIndica o valor numérico inteiro que será convertido. X
    cRet(caracter)
  • Retorna uma string de dois bytes que contém um inteiro binário de 16 bits.

Os dígitos decimais passados através do parâmetro são truncados e, portanto, não considerados na conversão.

#DEFINE CRLF Chr(13)+Chr(10)User Function Exemplo()Local cMensagem := ""//+----------------------------------------------------------------------------+//|Exemplifica o uso da função I2Bin                                           |//+----------------------------------------------------------------------------+  cMensagem += "[" + I2Bin(4276803) + "] = I2Bin(4276803)" + CRLF  cMensagem += "[" + I2Bin(  16962) + "] = I2Bin(16962)" + CRLF  cMensagem += "[" + I2Bin(  16705) + "] = I2Bin(16705)" + CRLF//+----------------------------------------------------------------------------+//|Apresenta uma mensagem com os resultados obtidos                            |//+----------------------------------------------------------------------------+Return MsgInfo(cMensagem, "Exemplo do I2Bin")

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

  • Sem rótulos