Afficher le code ASCII d'un caractère

swadfish
Messages postés
16
Date d'inscription
mardi 21 février 2006
Statut
Membre
Dernière intervention
8 février 2010
- 10 déc. 2006 à 00:54
f0xi
Messages postés
4205
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
12 mars 2022
- 10 déc. 2006 à 13:37
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

spidermario
Messages postés
121
Date d'inscription
mercredi 26 octobre 2005
Statut
Membre
Dernière intervention
14 mars 2009
1
10 déc. 2006 à 11:48
la fonction Ord renvoie le code ASCII du caractère passé en paramètre.
1
f0xi
Messages postés
4205
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
12 mars 2022
38
10 déc. 2006 à 13: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

0