String vers Byte ???

Bonjours à tous et à toutes.

Quelqu'un pourais t'il me dire comment faire pour passer le contenue d'une variable type string dans une autre de type byte ?

var FB : File Of Byte;
     b : Byte;
     oct:string;
     a:integer;
 begin
  a:=$401A;
   oct:=box.text;
     b:=???(oct);   // comment passer 'oct'(string) dans 'b' (byte) ?
      assignfile(FB , 'test.bin');
      reset(FB);
     seek(FB,a); 
    write(FB,b);
  closefile(FB);
 end;

Merci.
Bonne prog...

Salut,

Une String c'est trop grand pour être stockée dans un Byte...

Tu peux considérer ta chaîne comme un tableau de Byte éventuellement.

Pour mettre le premier caractère de la chaîne, tu peux probablement tout simplement le caster :

write(FB, Byte(oct[1]));

Plus d'infos sur les chaînes

---

3ème année en ecole d'ingé d'info cherche stage de 4 mois à partir du 01/04/08

Salut,

avec un PByte c'est tout à fait possible
Regarde mon snippet (le dernier de la liste) pour un exemple précis

 
@+
Cirec

---

Merci à tous pour votre aide :).
La methode de kenavo correspond mieux a mon besoin ;) .
J'ai juste à fair un petit traitement sur la chaine contenue dans ma box pour y ajouter le "$" devant chaque octèts puisque je travaille avec des valeur hexa (la box contien 16 octèts).

Encore merci.

Bonne prog...