Discussion :

[remi62114]

Bonjour,

voilà je voudrais savoir s'il est possible de convertir des donées de type string en type Byte ou Integer.

j'ai éssayé la fonction StrToInt mais celle ci me renvoie un message d'érreur si veux convertir un caractére différent des chiffres de 0 à 9 comme par exemple si je veux convertir la lettre A.

est ce quelqu'un aurait une iddée de comment je pourrais procéder , merci

[sjrd]

Si tu veux convertir la chaîne Str, écrite en hexadécimal, en entier Integer, il faut utiliser StrToInt('$' + Str).

[e-ric]

Bon tu vas rigoler mais une chaîne de caractères c'est déjà du binaire. La raison est simple, tout portion de mémoire est une suite d'octet, en particulier une chaîne de caractère. Ainsi 'ABC' qui semble être une jolie chaîne de caractères toute innocente est en fait en mémoire une redoutable suite d'octets (petits entiers de 8 bits): #$41#$42#$43#$00.

C'est la façon dont on la traite qui fait la différence. Ton problème consiste à changer la forme d'une chaîne de caractère d'une représentation à une autre. Mon problème, pour pouvoir te répondre, est de savoir ce que tu veux comme représentation finale ?

Si tu veux convertir un caractère en byte c'est simple, il faut employer Ord : Ord('A') retourne $41 (65 en base 10).

En employant des pointeurs, il est possible avec Delphi pour Win32, de parcourir une chaîne de caractère vue alors comme une suite d'octets, ce qu'elle est, en fait:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
procedure Affiche(const S: String);
var
  PB: PByte; // Rappel PByte = ^Byte
  msg: String;
begin
  msg := '';
  PB := PByte(PChar(S));
  while PB^ <> 0 do
  begin
    Msg := Msg + format('#$%.2x',[PB^]);
    Inc(PB);
  end;
  ShowMessage(msg);
End;

Si ça peut t'inspirer...

Cdlt

[BuzzLeclaire]

Salut,

Pourquoi de pas essayer :
integer('A') il te renverra la valeur ASCII de A, tu peux aussi faire Ord ('A')

A+

[NABIL74]

salut
je pense que la meilleure solution est de créer dynamiquement un tableau de byte qui a la longueur égale à celle de la chaîne. Une fois que nous avons notre tableau, nous le remplirons avec les valeurs de la chaîne, mais il y aurait certain décalage puisque la représentation ASCII du caractère "1" n'est pas équivalente à 1.
Voici un exemple de comment on peut retourner un tableau de byte:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
   ...
type
//tableau dynamique de type Array de Byte
   TByteArr = array of byte;
 
   ...
implementation
 
function ArrOfByte(AStr: String): TByteArr;
var
   j: integer;
begin
   SetLength( Result, Length(AStr)) ;
   for j := 0 to Length(AStr) - 1 do
     Result[j] := ord(AStr[j + 1]) - 48;
end;

je ne sais pas si c'est ça que tu cherches à savoir ou si ça peut t'aider.
A+