codial
Messages postés265Date d'inscriptionmercredi 14 avril 2004StatutMembreDernière intervention 5 mai 2015
-
7 sept. 2005 à 12:48
codial
Messages postés265Date d'inscriptionmercredi 14 avril 2004StatutMembreDernière intervention 5 mai 2015
-
7 sept. 2005 à 14:21
Bonjour,
Je cherche à obtenir le code ascci des caractères d'une chaine.
Je fais entre autres:
var
pt: string[1]
Q:LongInt
For I := 1 To Length(chaine) do
pt := Copy(chaine,I,1);
Q := ord(pt); ici j'ai un message "Types incompatibles mais si je mets
Q := ord('c') ça passe ??? Je ne comprends pas !!
Ou peut bien être mon erreur pt et une variable de type string ???
Case Q of
Ord('A').. Ord('Z'):begin //'***Majuscules