Probléme avec Tmemo

Bonjour,

j'ai déclarée une variable : "int donnee;"

Mon souhait afficher cette variable en binaire dans un Tmemo

Comment dois je programmer ceci ???

Merci d'avance

Salut roro41200
Peut etre comme ceci, sur la Form un TButton, un TMemo

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22

#include <vcl.h> #pragma hdrstop #include "Unit1.h" #include <idGlobal.hpp> // <---- ne pas oublier //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { int i = 123; AnsiString k = IntToBin(i); Memo1->Lines->Add(k); } //---------------------------------------------------------------------------

---

Super merci ça fonctionne

Mais alors par contre comment reduire le nombre de chiffre, car la quand je demande 1 en decimal en binaire j'obtient alors 31 zéro et 1 un.
(ex: 00000000000000000000000000000001)

Alors que moi je ne voudrais garder que 8 chiffres
(ex: 00000001)

En limitant le nombre de caracteres de la chaine k

Code:

---

1 2 3 4 5

int i = 123; AnsiString k = IntToBin(i); k = RightStr(k, 8); Memo1->Lines->Add(k);

---

Exellent Merci Sujet Résolu

Oups petit probléme en fait avec l'instruction "k = RightStr(k, 8);"

il ne reste bien plus que 8 chiffres

mais 1 me donne 00000000
2 me donne 00000001
3 me donne 00000001
4 me donne 00000010
5 me donne 00000010
.....

??? Comment cela ce fait-il que ça ai supprimées un chiffre à droite???

Je pense que RightStr tient compte du zero terminal de la chaine k, ceci fonctionne chez moi

Code:

---

1 2 3 4 5

int i = 5; AnsiString k = IntToBin(i) + " "; k = RightStr(k, 7); Memo1->Lines->Add(k);

---

Ceci est peut etre plus propre

Code:

---

1 2	AnsiString k = IntToBin(i) + '\0';

---

Voila c'est parfait merci encore bonne soiree a vous probléme résolu