Bonjour à tous,
Je recois comme paramétres le numéro du bit et sa valeur par exemple (6, false), et j'aimerais avec ca remplir un byte et le convertir en integer.
exemple:
valeur de départ : 01001010
(6, false)
valeur d'arrivée : 00001010
En integer: 10
J'ai essayé avec la fonction suivante mais je n'arrive pas à récuperer la valeur:
Est-ce que quelqu'un pourrait m'orienter pour trouver une solution simple... surtout que je sais que c'est très simple car en assembleur c'est fait en 2 lignes mais je n'ai pas envie de mettre de l'assembleur dans mon code.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 procedure var i : integer; Value: TBits; begin Value.Size := 8; Value.Bits[ValueBit] := false; //value bit = 6 end;
Valentin
Partager