Conversion ANSI <-> OEM pour le mode console par API
Publié : lun. 07/août/2006 5:54
Bonjour à toutes et à tous,
ANSI -> OEM : CHARTOOEM_(a$,a$)
OEM -> ANSI : OEMTOCHAR_(a$,a$)
A peluche les nounours

Pour ceux qui ne connaîtraient pas les API de conversion ANSI <-> OEM pour les accents du mode console.Pour afficher des caractères dit spéciaux en console, il faut utiliser la fonction Chr(Code).
Les plus fréquents :
- Chr(130) : é
- Chr(136) : ê
- Chr(133) : à
- Chr(138) : è

ANSI -> OEM : CHARTOOEM_(a$,a$)
OEM -> ANSI : OEMTOCHAR_(a$,a$)
Code : Tout sélectionner
a$="abc ABC àâçéèêîôù ÀÂÇÉÈÊÎÔÙ 123"
OpenConsole()
ConsoleColor(15,0)
Debug "ANSI -> OEM"
PrintN("ANSI -> OEM")
Debug a$
PrintN(a$)
CHARTOOEM_(a$,a$)
Debug a$
PrintN(a$)
Debug ""
PrintN("")
Debug "OEM -> ANSI"
PrintN("OEM -> ANSI")
Debug a$
PrintN(a$)
OEMTOCHAR_(a$,a$)
Debug a$
PrintN(a$)
Repeat
Until Inkey()<>"" ; Touche pour quitter
CloseConsole()


