FOROS PROFESIONALES
WINDEV
,
WEBDEV
y
WINDEV Mobile
Inicio
|
Mensajes recientes
|
Conéctese...
|
Desconectar
|
Español
Inicio
→
WINDEV (versiones precedentes)
→
Convertion Decimal en binaire
Convertion Decimal en binaire
Iniciado por Joly Alain, 14,ene. 2007 21:40 - 3 respuestas
Conéctese…
Joly Alain
#1
Publicado el 14,enero 2007 - 21:40
Bonjour a tous,
Mon pbl est le suivant, une DLL me retourne un entier entre 0 et 255 afin de me faire conaitre la position d'une serie de 8 ports logique sur une carte d'acquisition.
Chacun des 8 bits peut donc être a 1 ou 0.
Comment convertir l'entier retourné en mode binaire, afin de connaitre d'une maniére individuel, la position de chacun des 8 bits.
Merci
Informar
0
0
Philippe Pasquali
#2
Publicado el 15,enero 2007 - 10:11
Bonjour
si tu as une variable EtatPort est un entier sans signe sur 1 octet = 0xA5
alors
EtBinaire(EtatPort,0x01) = valeur du bit n°0
EtBinaire(EtatPort,0x02) = valeur du bit n°1
EtBinaire(EtatPort,0x04) = valeur du bit n°2
EtBinaire(EtatPort,0x08) = valeur du bit n°3
EtBinaire(EtatPort,0x10) = valeur du bit n°4
EtBinaire(EtatPort,0x20) = valeur du bit n°5
EtBinaire(EtatPort,0x40) = valeur du bit n°6
EtBinaire(EtatPort,0x80) = valeur du bit n°7
"Joly Alain" <joly.alain@neuf.fr> a écrit dans le message de news:
45aa8352$1@news.pcsoft.fr...
Bonjour a tous,
Mon pbl est le suivant, une DLL me retourne un entier entre 0 et 255 afin
de me faire conaitre la position d'une serie de 8 ports logique sur une
carte d'acquisition.
Chacun des 8 bits peut donc être a 1 ou 0.
Comment convertir l'entier retourné en mode binaire, afin de connaitre
d'une maniére individuel, la position de chacun des 8 bits.
Merci
Informar
0
0
Eric Descatoire
#3
Publicado el 15,enero 2007 - 12:13
Bonjour,
Voici un code pour cela:
Nb est un entier // entre 0 et 255
sBinaire est une chaîne = ""
TANTQUE Nb > 0
sBinaire = modulo(Nb,2) + sBinaire
Nb = Nb/2
FIN
info(sBinaire)
Bon dev,
Eric
Informar
0
0
Patrick
#4
Miembro registrado
34 mensajes
Popularité : +1 (1 vote)
Publicado el 04,agosto 2021 - 11:55
Bonjour et merci
Même 14 ans après, ce code reste bien fait et utile
Informar
0
0
→ Volver a WINDEV (versiones precedentes)
WINDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV (versiones precedentes)
WEBDEV (versiones precedentes)
WINDEV Mobile (versiones precedentes)
Reports & Queries
Irrelevante
Herramientas
Français
English
Español
Portuguesa
Fermer cette fenêtre
Búsqueda Tipo
Sólo temas
Todos los mensajes
Periodo Buscar
Cualquier fecha
Última hora
Última 24 horas
Última semana
Último mes
Último año
Cancelar
Vista previa del mensaje
Añadiendo una imagen
Importar una imagen desde una URL
Enviar una imagen desde un archivo de su disco
Arrastrar un archivo o click en "Examinar..."
o
Cancelar
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Texto