Voila je tente de faire une routine de conversion byte par byte
ca donne ca :
var
len (longueurdelastringhexa) : Byte
decimal,temp,ecx : String;
A : TFGInt;
F(incrementeurdelastring) : Byte;
Procedure Conversion;
begin
ecx := chr(ord(test[F]));
Base256StringToFGInt(ecx,A);
FGIntToBase10String(A,temp);
FGIntDestroy(A);
dec(len);
inc(F);
decimal := temp;
end;
Ce qui me manque c'est comment faire la loop, comment avoir la longueur de la string
(len := Lenght(test);marche pas?)
et comment ajouter au fur et a mesure dans decimal les bytes convertis