Section courante

A propos

Section administrative du site

ANSITOOEM

 ANSI à OEM
Turbo Pascal pour Windows WINPROCS

Syntaxe

Function AnsiToOem(AnsiStr, OemStr: PChar): Integer;

Paramètres

Nom Description
AnsiStr Ce paramètre permet d'indiquer la chaîne de caractères en ANSI à convertir
OemStr Ce paramètre permet d'indiquer la chaîne de caractères en OEM, laquelle contient le résultat.

Description

Cette fonction permet d'effectuer la conversion d'une chaîne de caractères ANSI à une chaîne de caractères Windows OEM.

Exemple

Voici un exemple de l'utilisation de cette fonction :

  1. Program AnsiToOEMSamples;
  2.  
  3. Uses WinCrt,Strings,WinProcs;
  4.  
  5. Var
  6.  Result:Array[0..255]of Char;
  7.  
  8. BEGIN
  9.  AnsiToOEM(#233 ,Result); { Code ANSI du «é» }
  10.  WriteLn('Longueur = ',StrLen(Result));
  11.  WriteLn('Valeur = ',Ord(Result[0]));
  12. END.

on obtiendra un résultat suivant :

Longueur = 1
Valeur = 130

Voir également

Langage de programmation - Turbo Pascal pour Windows - Référence de procédures et fonctions - ANSITOOEMBUFF
Langage de programmation - Turbo Pascal pour Windows - Référence de procédures et fonctions - OEMTOANSI

Dernière mise à jour : Dimanche, le 10 décembre 2017