4D Doc Center : Code de caractere

4D v13.4

Code de caractere


Code de caractere ( unCaractère ) -> Résultat

Paramètre	Type	Description
unCaractère	Chaîne	Caractère dont vous voulez obtenir le code
Résultat	Entier long	Code du caractère

Description

La commande Code de caractere retourne le code de caractère courant de unCaractère.

Si la base fonctionne en mode Unicode (mode par défaut pour les bases créées à compter de la version 11 de 4D), la commande retourne le code Unicode UTF-16 de caractère (compris entre 1 et 65535).
Si la base fonctionne en mode compatibilité ASCII, la commande retourne le code ASCII de unCaractère (compris entre 0 et 255).

Pour plus d'informations sur les modes de gestion des chaînes de 4D, reportez-vous à la section Codes ASCII.

Si la chaîne unCaractère comporte plus d'un caractère, Code de caractere retourne uniquement le code du premier caractère.

La fonction Caractere est l'inverse de Code de caractere. Elle retourne le caractère désigné par un code UTF-16 ou ASCII.

Important : En mode compatibilité ASCII, toutes les valeurs de texte, champs ou variables, utilisent la table ASCII de Mac OS, sur les plates-formes Macintosh et Windows — si aucune conversion vers une autre table ASCII n'a été effectuée. Pour plus d'informations sur ce point, reportez-vous à la section Codes ASCII.

Exemple 1

Les caractères majuscules et minuscules ne sont pas différenciés lors d'une comparaison ou d'une recherche. Vous pouvez utiliser la fonction Code de caractere si vous souhaitez établir une distinction entre les caractères majuscules et les minuscules.
En effet, cette ligne retourne VRAI :

("A"="a")

En revanche, cette ligne retourne FAUX :

(Code de caractere("A")=Code de caractere("a"))

Exemple 2

L'exemple suivant retourne le code du premier caractère de la chaîne "ABC" :

RécupCode:=Code de caractere("ABC") ` RécupCode prend la valeur 65, le code de caractère de A

Exemple 3

Le code suivant :

 Boucle($vlCar;1;Longueur(vtText))

    Au cas ou

       :(vtText≤$vlCar≥=Caractere(Retour chariot))

  ` Faire quelque chose

       :(vtText≤$vlCar≥=Caractere(Tab))

  ` Faire autre chose

       :(...)

  ` ...

    Fin de cas

 Fin de boucle

... lorsqu'il est utilisé de nombreuses fois avec des textes de taille importante, s'exécutera plus vite, une fois compilé, s'il est écrit ainsi :

 Boucle($vlCar;1;Longueur(vtText))

    $vlCode:=Code de caractere(vtText≤$vlCar≥)

    Au cas ou

       :($vlCode=Retour chariot)

  ` Faire quelque chose

       :($vlCode=Tabulation)

  ` Faire autre chose

       :(...)

  ` ...

    Fin de cas

 Fin de boucle

... et ce, pour deux raisons principales : il ne référence un caractère qu'une seule fois par itération, et compare des entiers longs et non des chaînes de caractères lorsqu'il teste la présence de retours chariot et de tabulations. Nous vous conseillons d'employer cette technique lorsque vous travaillez avec des caractères standard tels que des Retours chariot et des Tabulations.