Bonjour
J'ai le probleme suivant:
-une petite centaine de messages d'erreur/information differents
-Plusieurs indicateurs d'erreur peuvent etre excites simultanement
J'ai donc dans le programme un tableau de booleans, chacun correspondant a
Dim aErr(128) As Boolean
Je voudrais passer a une representation plus condensee (disque) ou chacun
de l'erreur.
Dim sErr As String *16
Je n'arrive pas a trouver de codes operation manipulant simplement les
Je recherche des morceaux de code me permettant de passer de la
Merci
Bonjour
J'ai le probleme suivant:
-une petite centaine de messages d'erreur/information differents
-Plusieurs indicateurs d'erreur peuvent etre excites simultanement
J'ai donc dans le programme un tableau de booleans, chacun correspondant a
Dim aErr(128) As Boolean
Je voudrais passer a une representation plus condensee (disque) ou chacun
de l'erreur.
Dim sErr As String *16
Je n'arrive pas a trouver de codes operation manipulant simplement les
Je recherche des morceaux de code me permettant de passer de la
Merci
Bonjour
J'ai le probleme suivant:
-une petite centaine de messages d'erreur/information differents
-Plusieurs indicateurs d'erreur peuvent etre excites simultanement
J'ai donc dans le programme un tableau de booleans, chacun correspondant a
Dim aErr(128) As Boolean
Je voudrais passer a une representation plus condensee (disque) ou chacun
de l'erreur.
Dim sErr As String *16
Je n'arrive pas a trouver de codes operation manipulant simplement les
Je recherche des morceaux de code me permettant de passer de la
Merci
"xx" a écrit dans le message de news:
J'ai le probleme suivant:
-une petite centaine de messages d'erreur/information differents
(arrondissons a 128 ...)
-Plusieurs indicateurs d'erreur peuvent etre excites simultanement
J'ai donc dans le programme un tableau de booleans,
chacun correspondant a une erreur.
Dim aErr(128) As Boolean
Je voudrais passer a une representation plus condensee (disque)
ou chacun des bits d'une chaine de caracteres fixe est
representatif de l'erreur.
Dim sErr As String *16
Je n'arrive pas a trouver de codes operation manipulant
simplement les bits.
Je recherche des morceaux de code me permettant de passer
de la representation tableau a la representation chaine,
et vice-versa
je sais pas si ça répond à tes besoins, voilà un exemple que j'utilise sur
une feuille où 6 checkbox peuvent être activés ou desactivé je stock la
valeur des combinaisons dans un entier
donnee(i) est le nom du checkbox
Public Function bintodec(ar() As Integer) As Integer
Dim a As Integer
For i% = 0 To UBound(ar())
If ar(i%) = 1 Then
a = a + 2 ^ i%
End If
Next i%
bintodec = a
End Function
"xx" <xx@nospam.net> a écrit dans le message de news:
OOUqgnAhDHA.1952@TK2MSFTNGP12.phx.gbl...
J'ai le probleme suivant:
-une petite centaine de messages d'erreur/information differents
(arrondissons a 128 ...)
-Plusieurs indicateurs d'erreur peuvent etre excites simultanement
J'ai donc dans le programme un tableau de booleans,
chacun correspondant a une erreur.
Dim aErr(128) As Boolean
Je voudrais passer a une representation plus condensee (disque)
ou chacun des bits d'une chaine de caracteres fixe est
representatif de l'erreur.
Dim sErr As String *16
Je n'arrive pas a trouver de codes operation manipulant
simplement les bits.
Je recherche des morceaux de code me permettant de passer
de la representation tableau a la representation chaine,
et vice-versa
je sais pas si ça répond à tes besoins, voilà un exemple que j'utilise sur
une feuille où 6 checkbox peuvent être activés ou desactivé je stock la
valeur des combinaisons dans un entier
donnee(i) est le nom du checkbox
Public Function bintodec(ar() As Integer) As Integer
Dim a As Integer
For i% = 0 To UBound(ar())
If ar(i%) = 1 Then
a = a + 2 ^ i%
End If
Next i%
bintodec = a
End Function
"xx" a écrit dans le message de news:
J'ai le probleme suivant:
-une petite centaine de messages d'erreur/information differents
(arrondissons a 128 ...)
-Plusieurs indicateurs d'erreur peuvent etre excites simultanement
J'ai donc dans le programme un tableau de booleans,
chacun correspondant a une erreur.
Dim aErr(128) As Boolean
Je voudrais passer a une representation plus condensee (disque)
ou chacun des bits d'une chaine de caracteres fixe est
representatif de l'erreur.
Dim sErr As String *16
Je n'arrive pas a trouver de codes operation manipulant
simplement les bits.
Je recherche des morceaux de code me permettant de passer
de la representation tableau a la representation chaine,
et vice-versa
je sais pas si ça répond à tes besoins, voilà un exemple que j'utilise sur
une feuille où 6 checkbox peuvent être activés ou desactivé je stock la
valeur des combinaisons dans un entier
donnee(i) est le nom du checkbox
Public Function bintodec(ar() As Integer) As Integer
Dim a As Integer
For i% = 0 To UBound(ar())
If ar(i%) = 1 Then
a = a + 2 ^ i%
End If
Next i%
bintodec = a
End Function
"Christophe" a écrit dans le message de
> "xx" a écrit dans le message de news:
>
>> J'ai le probleme suivant:
>> -une petite centaine de messages d'erreur/information differents
>> (arrondissons a 128 ...)
>> -Plusieurs indicateurs d'erreur peuvent etre excites simultanement
>>
>> J'ai donc dans le programme un tableau de booleans,
>> chacun correspondant a une erreur.
>> Dim aErr(128) As Boolean
>>
>> Je voudrais passer a une representation plus condensee (disque)
>> ou chacun des bits d'une chaine de caracteres fixe est
>> representatif de l'erreur.
>> Dim sErr As String *16
>>
>> Je n'arrive pas a trouver de codes operation manipulant
>> simplement les bits.
>> Je recherche des morceaux de code me permettant de passer
>> de la representation tableau a la representation chaine,
>> et vice-versa
> je sais pas si ça répond à tes besoins, voilà un exemple que j'utilise
> une feuille où 6 checkbox peuvent être activés ou desactivé je stock la
> valeur des combinaisons dans un entier
> donnee(i) est le nom du checkbox
> Public Function bintodec(ar() As Integer) As Integer
> Dim a As Integer
> For i% = 0 To UBound(ar())
> If ar(i%) = 1 Then
> a = a + 2 ^ i%
> End If
> Next i%
> bintodec = a
> End Function
Rien de personnel contre ta solution, d'autant que
-je n'ai rien trouve de fondamentalement meilleur
-je crains qu'il n'y ait rien de fondamentalement meilleur (cf infra)
mais c'est une usine a gaz.
Je n'en ai pas apres toi, mais apres le langage:
Si VB6 impose de passer par des ^2 pour manipuler des bits
c'est tout simplement dissuasif
J'ai cherche du cote des API, mais CopyMemory & Co ne manipulent rien de
De fait, eg je croyais que
"&B" permettait de declarer une valeur en bits
comme "&H" permettait de declarer une valeur en hexa
mais je me suis fait jeter ...
GRRRRR
"Christophe" <geo.ch@tiscali.fr> a écrit dans le message de
> "xx" <xx@nospam.net> a écrit dans le message de news:
> OOUqgnAhDHA.1952@TK2MSFTNGP12.phx.gbl...
>> J'ai le probleme suivant:
>> -une petite centaine de messages d'erreur/information differents
>> (arrondissons a 128 ...)
>> -Plusieurs indicateurs d'erreur peuvent etre excites simultanement
>>
>> J'ai donc dans le programme un tableau de booleans,
>> chacun correspondant a une erreur.
>> Dim aErr(128) As Boolean
>>
>> Je voudrais passer a une representation plus condensee (disque)
>> ou chacun des bits d'une chaine de caracteres fixe est
>> representatif de l'erreur.
>> Dim sErr As String *16
>>
>> Je n'arrive pas a trouver de codes operation manipulant
>> simplement les bits.
>> Je recherche des morceaux de code me permettant de passer
>> de la representation tableau a la representation chaine,
>> et vice-versa
> je sais pas si ça répond à tes besoins, voilà un exemple que j'utilise
> une feuille où 6 checkbox peuvent être activés ou desactivé je stock la
> valeur des combinaisons dans un entier
> donnee(i) est le nom du checkbox
> Public Function bintodec(ar() As Integer) As Integer
> Dim a As Integer
> For i% = 0 To UBound(ar())
> If ar(i%) = 1 Then
> a = a + 2 ^ i%
> End If
> Next i%
> bintodec = a
> End Function
Rien de personnel contre ta solution, d'autant que
-je n'ai rien trouve de fondamentalement meilleur
-je crains qu'il n'y ait rien de fondamentalement meilleur (cf infra)
mais c'est une usine a gaz.
Je n'en ai pas apres toi, mais apres le langage:
Si VB6 impose de passer par des ^2 pour manipuler des bits
c'est tout simplement dissuasif
J'ai cherche du cote des API, mais CopyMemory & Co ne manipulent rien de
De fait, eg je croyais que
"&B" permettait de declarer une valeur en bits
comme "&H" permettait de declarer une valeur en hexa
mais je me suis fait jeter ...
GRRRRR
"Christophe" a écrit dans le message de
> "xx" a écrit dans le message de news:
>
>> J'ai le probleme suivant:
>> -une petite centaine de messages d'erreur/information differents
>> (arrondissons a 128 ...)
>> -Plusieurs indicateurs d'erreur peuvent etre excites simultanement
>>
>> J'ai donc dans le programme un tableau de booleans,
>> chacun correspondant a une erreur.
>> Dim aErr(128) As Boolean
>>
>> Je voudrais passer a une representation plus condensee (disque)
>> ou chacun des bits d'une chaine de caracteres fixe est
>> representatif de l'erreur.
>> Dim sErr As String *16
>>
>> Je n'arrive pas a trouver de codes operation manipulant
>> simplement les bits.
>> Je recherche des morceaux de code me permettant de passer
>> de la representation tableau a la representation chaine,
>> et vice-versa
> je sais pas si ça répond à tes besoins, voilà un exemple que j'utilise
> une feuille où 6 checkbox peuvent être activés ou desactivé je stock la
> valeur des combinaisons dans un entier
> donnee(i) est le nom du checkbox
> Public Function bintodec(ar() As Integer) As Integer
> Dim a As Integer
> For i% = 0 To UBound(ar())
> If ar(i%) = 1 Then
> a = a + 2 ^ i%
> End If
> Next i%
> bintodec = a
> End Function
Rien de personnel contre ta solution, d'autant que
-je n'ai rien trouve de fondamentalement meilleur
-je crains qu'il n'y ait rien de fondamentalement meilleur (cf infra)
mais c'est une usine a gaz.
Je n'en ai pas apres toi, mais apres le langage:
Si VB6 impose de passer par des ^2 pour manipuler des bits
c'est tout simplement dissuasif
J'ai cherche du cote des API, mais CopyMemory & Co ne manipulent rien de
De fait, eg je croyais que
"&B" permettait de declarer une valeur en bits
comme "&H" permettait de declarer une valeur en hexa
mais je me suis fait jeter ...
GRRRRR
Re,
Je crois qu'il y a une solution pour isoler le bit n d'un nombre en
utilisant un masque hexa
note que mon usine à gaz permet de stocker un grand nombre
de combinaisons dans un entier ou mieux un long
Re,
Je crois qu'il y a une solution pour isoler le bit n d'un nombre en
utilisant un masque hexa
note que mon usine à gaz permet de stocker un grand nombre
de combinaisons dans un entier ou mieux un long
Re,
Je crois qu'il y a une solution pour isoler le bit n d'un nombre en
utilisant un masque hexa
note que mon usine à gaz permet de stocker un grand nombre
de combinaisons dans un entier ou mieux un long
"Christophe" a écrit dans le message de
> "xx" a écrit dans le message de news:
>
>> J'ai le probleme suivant:
>> -une petite centaine de messages d'erreur/information differents
>> (arrondissons a 128 ...)
>> -Plusieurs indicateurs d'erreur peuvent etre excites simultanement
>>
>> J'ai donc dans le programme un tableau de booleans,
>> chacun correspondant a une erreur.
>> Dim aErr(128) As Boolean
>>
>> Je voudrais passer a une representation plus condensee (disque)
>> ou chacun des bits d'une chaine de caracteres fixe est
>> representatif de l'erreur.
>> Dim sErr As String *16
>>
>> Je n'arrive pas a trouver de codes operation manipulant
>> simplement les bits.
>> Je recherche des morceaux de code me permettant de passer
>> de la representation tableau a la representation chaine,
>> et vice-versa
> je sais pas si ça répond à tes besoins, voilà un exemple que j'utilise
> une feuille où 6 checkbox peuvent être activés ou desactivé je stock la
> valeur des combinaisons dans un entier
> donnee(i) est le nom du checkbox
> Public Function bintodec(ar() As Integer) As Integer
> Dim a As Integer
> For i% = 0 To UBound(ar())
> If ar(i%) = 1 Then
> a = a + 2 ^ i%
> End If
> Next i%
> bintodec = a
> End Function
Rien de personnel contre ta solution, d'autant que
-je n'ai rien trouve de fondamentalement meilleur
-je crains qu'il n'y ait rien de fondamentalement meilleur (cf infra)
mais c'est une usine a gaz.
Je n'en ai pas apres toi, mais apres le langage:
Si VB6 impose de passer par des ^2 pour manipuler des bits
c'est tout simplement dissuasif
J'ai cherche du cote des API, mais CopyMemory & Co ne manipulent rien de
De fait, eg je croyais que
"&B" permettait de declarer une valeur en bits
comme "&H" permettait de declarer une valeur en hexa
mais je me suis fait jeter ...
GRRRRR
"Christophe" <geo.ch@tiscali.fr> a écrit dans le message de
> "xx" <xx@nospam.net> a écrit dans le message de news:
> OOUqgnAhDHA.1952@TK2MSFTNGP12.phx.gbl...
>> J'ai le probleme suivant:
>> -une petite centaine de messages d'erreur/information differents
>> (arrondissons a 128 ...)
>> -Plusieurs indicateurs d'erreur peuvent etre excites simultanement
>>
>> J'ai donc dans le programme un tableau de booleans,
>> chacun correspondant a une erreur.
>> Dim aErr(128) As Boolean
>>
>> Je voudrais passer a une representation plus condensee (disque)
>> ou chacun des bits d'une chaine de caracteres fixe est
>> representatif de l'erreur.
>> Dim sErr As String *16
>>
>> Je n'arrive pas a trouver de codes operation manipulant
>> simplement les bits.
>> Je recherche des morceaux de code me permettant de passer
>> de la representation tableau a la representation chaine,
>> et vice-versa
> je sais pas si ça répond à tes besoins, voilà un exemple que j'utilise
> une feuille où 6 checkbox peuvent être activés ou desactivé je stock la
> valeur des combinaisons dans un entier
> donnee(i) est le nom du checkbox
> Public Function bintodec(ar() As Integer) As Integer
> Dim a As Integer
> For i% = 0 To UBound(ar())
> If ar(i%) = 1 Then
> a = a + 2 ^ i%
> End If
> Next i%
> bintodec = a
> End Function
Rien de personnel contre ta solution, d'autant que
-je n'ai rien trouve de fondamentalement meilleur
-je crains qu'il n'y ait rien de fondamentalement meilleur (cf infra)
mais c'est une usine a gaz.
Je n'en ai pas apres toi, mais apres le langage:
Si VB6 impose de passer par des ^2 pour manipuler des bits
c'est tout simplement dissuasif
J'ai cherche du cote des API, mais CopyMemory & Co ne manipulent rien de
De fait, eg je croyais que
"&B" permettait de declarer une valeur en bits
comme "&H" permettait de declarer une valeur en hexa
mais je me suis fait jeter ...
GRRRRR
"Christophe" a écrit dans le message de
> "xx" a écrit dans le message de news:
>
>> J'ai le probleme suivant:
>> -une petite centaine de messages d'erreur/information differents
>> (arrondissons a 128 ...)
>> -Plusieurs indicateurs d'erreur peuvent etre excites simultanement
>>
>> J'ai donc dans le programme un tableau de booleans,
>> chacun correspondant a une erreur.
>> Dim aErr(128) As Boolean
>>
>> Je voudrais passer a une representation plus condensee (disque)
>> ou chacun des bits d'une chaine de caracteres fixe est
>> representatif de l'erreur.
>> Dim sErr As String *16
>>
>> Je n'arrive pas a trouver de codes operation manipulant
>> simplement les bits.
>> Je recherche des morceaux de code me permettant de passer
>> de la representation tableau a la representation chaine,
>> et vice-versa
> je sais pas si ça répond à tes besoins, voilà un exemple que j'utilise
> une feuille où 6 checkbox peuvent être activés ou desactivé je stock la
> valeur des combinaisons dans un entier
> donnee(i) est le nom du checkbox
> Public Function bintodec(ar() As Integer) As Integer
> Dim a As Integer
> For i% = 0 To UBound(ar())
> If ar(i%) = 1 Then
> a = a + 2 ^ i%
> End If
> Next i%
> bintodec = a
> End Function
Rien de personnel contre ta solution, d'autant que
-je n'ai rien trouve de fondamentalement meilleur
-je crains qu'il n'y ait rien de fondamentalement meilleur (cf infra)
mais c'est une usine a gaz.
Je n'en ai pas apres toi, mais apres le langage:
Si VB6 impose de passer par des ^2 pour manipuler des bits
c'est tout simplement dissuasif
J'ai cherche du cote des API, mais CopyMemory & Co ne manipulent rien de
De fait, eg je croyais que
"&B" permettait de declarer une valeur en bits
comme "&H" permettait de declarer une valeur en hexa
mais je me suis fait jeter ...
GRRRRR
bj,
"xx" wrote in message
news:
> "Christophe" a écrit dans le message de
news:bl0ut7$iv1$
> > "xx" a écrit dans le message de news:
> >
>
> >> J'ai le probleme suivant:
> >> -une petite centaine de messages d'erreur/information differents
> >> (arrondissons a 128 ...)
> >> -Plusieurs indicateurs d'erreur peuvent etre excites simultanement
> >>
> >> J'ai donc dans le programme un tableau de booleans,
> >> chacun correspondant a une erreur.
> >> Dim aErr(128) As Boolean
> >>
> >> Je voudrais passer a une representation plus condensee (disque)
> >> ou chacun des bits d'une chaine de caracteres fixe est
> >> representatif de l'erreur.
> >> Dim sErr As String *16
> >>
> >> Je n'arrive pas a trouver de codes operation manipulant
> >> simplement les bits.
> >> Je recherche des morceaux de code me permettant de passer
> >> de la representation tableau a la representation chaine,
> >> et vice-versa
>
> > je sais pas si ça répond à tes besoins, voilà un exemple que j'utilise
sur
> > une feuille où 6 checkbox peuvent être activés ou desactivé je stock
> > valeur des combinaisons dans un entier
> > donnee(i) est le nom du checkbox
>
> > Public Function bintodec(ar() As Integer) As Integer
> > Dim a As Integer
> > For i% = 0 To UBound(ar())
> > If ar(i%) = 1 Then
> > a = a + 2 ^ i%
> > End If
> > Next i%
> > bintodec = a
> > End Function
>
> Rien de personnel contre ta solution, d'autant que
> -je n'ai rien trouve de fondamentalement meilleur
> -je crains qu'il n'y ait rien de fondamentalement meilleur (cf infra)
> mais c'est une usine a gaz.
> Je n'en ai pas apres toi, mais apres le langage:
> Si VB6 impose de passer par des ^2 pour manipuler des bits
> c'est tout simplement dissuasif
>
> J'ai cherche du cote des API, mais CopyMemory & Co ne manipulent rien de
plus petit que le Byte (octet)
> De fait, eg je croyais que
> "&B" permettait de declarer une valeur en bits
> comme "&H" permettait de declarer une valeur en hexa
> mais je me suis fait jeter ...
>
> GRRRRR
>
Il te reste toujours, la solution de passer par un DLL en C, qui te fait
travail.
(j'en ai fait une, il y a quelque temps, pour tester les odl...)
Best regards
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.521 / Virus Database: 319 - Release Date: 23/09/2003
bj,
"xx" <xx@nospam.net> wrote in message
news:uWnYMDDhDHA.2516@TK2MSFTNGP09.phx.gbl...
> "Christophe" <geo.ch@tiscali.fr> a écrit dans le message de
news:bl0ut7$iv1$1@news.tiscali.fr...
> > "xx" <xx@nospam.net> a écrit dans le message de news:
> > OOUqgnAhDHA.1952@TK2MSFTNGP12.phx.gbl...
>
> >> J'ai le probleme suivant:
> >> -une petite centaine de messages d'erreur/information differents
> >> (arrondissons a 128 ...)
> >> -Plusieurs indicateurs d'erreur peuvent etre excites simultanement
> >>
> >> J'ai donc dans le programme un tableau de booleans,
> >> chacun correspondant a une erreur.
> >> Dim aErr(128) As Boolean
> >>
> >> Je voudrais passer a une representation plus condensee (disque)
> >> ou chacun des bits d'une chaine de caracteres fixe est
> >> representatif de l'erreur.
> >> Dim sErr As String *16
> >>
> >> Je n'arrive pas a trouver de codes operation manipulant
> >> simplement les bits.
> >> Je recherche des morceaux de code me permettant de passer
> >> de la representation tableau a la representation chaine,
> >> et vice-versa
>
> > je sais pas si ça répond à tes besoins, voilà un exemple que j'utilise
sur
> > une feuille où 6 checkbox peuvent être activés ou desactivé je stock
> > valeur des combinaisons dans un entier
> > donnee(i) est le nom du checkbox
>
> > Public Function bintodec(ar() As Integer) As Integer
> > Dim a As Integer
> > For i% = 0 To UBound(ar())
> > If ar(i%) = 1 Then
> > a = a + 2 ^ i%
> > End If
> > Next i%
> > bintodec = a
> > End Function
>
> Rien de personnel contre ta solution, d'autant que
> -je n'ai rien trouve de fondamentalement meilleur
> -je crains qu'il n'y ait rien de fondamentalement meilleur (cf infra)
> mais c'est une usine a gaz.
> Je n'en ai pas apres toi, mais apres le langage:
> Si VB6 impose de passer par des ^2 pour manipuler des bits
> c'est tout simplement dissuasif
>
> J'ai cherche du cote des API, mais CopyMemory & Co ne manipulent rien de
plus petit que le Byte (octet)
> De fait, eg je croyais que
> "&B" permettait de declarer une valeur en bits
> comme "&H" permettait de declarer une valeur en hexa
> mais je me suis fait jeter ...
>
> GRRRRR
>
Il te reste toujours, la solution de passer par un DLL en C, qui te fait
travail.
(j'en ai fait une, il y a quelque temps, pour tester les odl...)
Best regards
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.521 / Virus Database: 319 - Release Date: 23/09/2003
bj,
"xx" wrote in message
news:
> "Christophe" a écrit dans le message de
news:bl0ut7$iv1$
> > "xx" a écrit dans le message de news:
> >
>
> >> J'ai le probleme suivant:
> >> -une petite centaine de messages d'erreur/information differents
> >> (arrondissons a 128 ...)
> >> -Plusieurs indicateurs d'erreur peuvent etre excites simultanement
> >>
> >> J'ai donc dans le programme un tableau de booleans,
> >> chacun correspondant a une erreur.
> >> Dim aErr(128) As Boolean
> >>
> >> Je voudrais passer a une representation plus condensee (disque)
> >> ou chacun des bits d'une chaine de caracteres fixe est
> >> representatif de l'erreur.
> >> Dim sErr As String *16
> >>
> >> Je n'arrive pas a trouver de codes operation manipulant
> >> simplement les bits.
> >> Je recherche des morceaux de code me permettant de passer
> >> de la representation tableau a la representation chaine,
> >> et vice-versa
>
> > je sais pas si ça répond à tes besoins, voilà un exemple que j'utilise
sur
> > une feuille où 6 checkbox peuvent être activés ou desactivé je stock
> > valeur des combinaisons dans un entier
> > donnee(i) est le nom du checkbox
>
> > Public Function bintodec(ar() As Integer) As Integer
> > Dim a As Integer
> > For i% = 0 To UBound(ar())
> > If ar(i%) = 1 Then
> > a = a + 2 ^ i%
> > End If
> > Next i%
> > bintodec = a
> > End Function
>
> Rien de personnel contre ta solution, d'autant que
> -je n'ai rien trouve de fondamentalement meilleur
> -je crains qu'il n'y ait rien de fondamentalement meilleur (cf infra)
> mais c'est une usine a gaz.
> Je n'en ai pas apres toi, mais apres le langage:
> Si VB6 impose de passer par des ^2 pour manipuler des bits
> c'est tout simplement dissuasif
>
> J'ai cherche du cote des API, mais CopyMemory & Co ne manipulent rien de
plus petit que le Byte (octet)
> De fait, eg je croyais que
> "&B" permettait de declarer une valeur en bits
> comme "&H" permettait de declarer une valeur en hexa
> mais je me suis fait jeter ...
>
> GRRRRR
>
Il te reste toujours, la solution de passer par un DLL en C, qui te fait
travail.
(j'en ai fait une, il y a quelque temps, pour tester les odl...)
Best regards
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.521 / Virus Database: 319 - Release Date: 23/09/2003
