Salut
Regarde dans la soucoupe. Il y a un assistant de code pour la
convertion hexadécimal vers décimal qui génère la proc.suivante.
FONCTION HexaVersEntier(ch)
ValD est un entier
ValH est une chaîne
i est un entier
ValD=0
ValH=Majuscule(ch)
// Si la chaîne n'est pas nulle
SI ValH<>"" ALORS
// Pour chaque lettre de la chaîne
POUR i=Taille(ValH) A 1 PAS -1
// On la convertit en sa valeur décimale
// et on l'ajoute au résultat en la multipliant par la
puissance de 16 correspondante
SELON ValH[[Taille(ValH)+1-i]]
CAS "A": ValD*Puissance(16,i-1)+ValD
CAS "B": ValD*Puissance(16,i-1)+ValD
CAS "C": ValD*Puissance(16,i-1)+ValD
CAS "D": ValD*Puissance(16,i-1)+ValD
CAS "E": ValD*Puissance(16,i-1)+ValD
CAS "F": ValD*Puissance(16,i-1)+ValD
AUTRES CAS:
ValD=Val(ValH[[Taille(ValH)+1-i]])*Puissance(16,i-1)+ValD
FIN
FIN
FIN
// Renvoie le résultat
RENVOYER ValD
--
Ciao
Pat Biker
http://aaa.windev.free.fr/On Wed, 12 Oct 2005 13:50:17 +0200, "Christian Gstalder"
<cgstalde.spamno@chpg.mc> wrote:
Re-bonjour,
A l'inverse de ma question précédente, comment affecter à un entier une
valeur contenue dans une chaîne?
Exemple :
La chaîne MaChaine contient à la position 6 la valeur 0x00000055 (85 en
décimal).
Les codes suivants ne donnent que 0 alors que je voudrais qu'ils donnent