[delphi 7] [String] [Tableau d'octets]

Bonjour à tous!



Je voudrais savoir si dans DELPHI7, il existe une fonction permettant de convertir une chaîne de caractères en tableau d'octets (array of byte).

Je ne connais pas de fonction spéciale, mais une chaîne étant un tableau de caractères, et Ord renvoyant la valeur ASCII du caractère,

Code:

---

Ord (maChaine [i]);

---

ou en transtypant

Code:

---

Byte (Ord (maChaine [i]));

---

devrait te renvoyer la valeur que tu veux, non ?

peut etre en feintant comme ca:

Code:

---

1 2	x := TByteDynArray(PChar(MaChaine));

---

a tester ...

(Si TByteDynArray n'est pas declarée dans Types, c'est juste un array of byte)

La solution de guillemouze me paraît extrèmement risquée. C'est la violation d'accès presque assurée.

Je préfèrerais :

Code:

---

1 2 3 4 5 6 7 8 9

var Str: string; Bytes: array of Byte; begin ... SetLength(Bytes, Length(Str)); Move(Str[1], Bytes[0], Length(Str)); ... end;

---

Citation:

---

Envoyé par sjrd

La solution de guillemouze me paraît extrèmement risquée. C'est la violation d'accès presque assurée.

---

oui mais la question etait :

Citation:

---

il existe une fonction permettant de convertir une chaîne de caractères en tableau d'octets

---

et il n'est pas précisé "sans AV" :mrgreen:
effectivement, ta solution est beaucoup plus sure.
Par contre, pourquoi un Move et pas un Copy? (je ne connais pas bien l'effet exacte de la fonction Move)

Citation:

---

Envoyé par guillemouze

Par contre, pourquoi un Move et pas un Copy? (je ne connais pas bien l'effet exacte de la fonction Move)

---

Parce qu'un Copy sur une chaîne renvoie une chaîne. Donc on n'est pas plus avancé :roll:

La routine Move(Source, Dest, Count) copie Count octets à partir de Source vers Dest.

ok, je viens de regarder dans l'aide les fonctions Copy et Move, je comprend mieux maintenant.
En fait j'ai été perturbé car je pensai aux fonction CopyMemory et MoveMemory. Mais Copy et Move ne sont pas du tout liées en fait ;)

Citation:

---

Envoyé par sjrd

La solution de guillemouze me paraît extrèmement risquée. C'est la violation d'accès presque assurée.

Je préfèrerais :

Code:

---

1 2 3 4 5 6 7 8 9

var Str: string; Bytes: array of Byte; begin ... SetLength(Bytes, Length(Str)); Move(Str[1], Bytes[0], Length(Str)); ... end;

---

---

OK ça marche. Merci