Afficher le code ASCII d'un caractère

Signaler
Messages postés
16
Date d'inscription
mardi 21 février 2006
Statut
Membre
Dernière intervention
8 février 2010
-
Messages postés
4202
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
13 juin 2020
-
salut tt le monde.
je veux créer une application sous delphi qui me donne le code ascii de chaque caracteres tapé dans un editbox.
merci d'avance.  @+

2 réponses

Messages postés
121
Date d'inscription
mercredi 26 octobre 2005
Statut
Membre
Dernière intervention
14 mars 2009
1
la fonction Ord renvoie le code ASCII du caractère passé en paramètre.
Messages postés
4202
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
13 juin 2020
37
function GetAsciiStr(const C : char) : string;
var p : byte absolute C;
begin
    result := format('$%0:.2x : #%0:d : '+c,[p]);
end;

afficheras :

GetAsciiStr('A')
-> $41 : #65 : A