Section courante

A propos

Section administrative du site

ANSISTRCOMP

 Compare des chaînes ANSI
Delphi/Kylix/Lazarus SysUtils

Syntaxe

Function AnsiStrComp(S1, S2:PChar):Integer;

Paramètres

Nom Description
S1 Ce paramètre permet d'indiquer la première chaîne de caractères ASCIZ à comparer
S2 Ce paramètre permet d'indiquer la deuxième chaîne de caractères ASCIZ à comparer

Description

Cette fonction retourne le résultat d'une comparaison entre deux chaînes de caractères ASCIZ, en mode Windows ANSI, en tenant compte des majuscule/minuscule. Ainsi, lorsqu'il comparera la même lettre minuscule avec la majuscule, il la considérera comme étant différente.

Exemple

Voici un exemple d'une utilisation typique de cette fonction :

  1. Program AnsiStrCompSamples;
  2.  
  3. {$APPTYPE CONSOLE}
  4.  
  5. Uses SysUtils;
  6.  
  7. BEGIN
  8.  WriteLn('AnsiStrComp(''Gladir'',''Gladir'') = ',AnsiStrComp('Gladir','Gladir'));
  9.  WriteLn('AnsiStrComp(''Gladir'',''Gladir.com'') = ',AnsiStrComp('Gladir','Gladir.com'));
  10.  WriteLn('AnsiStrComp(''Gladir.com'',''Gladir'') = ',AnsiStrComp('Gladir.com','Gladir'));
  11.  WriteLn('AnsiStrComp(''ABC'',''123'') = ',AnsiStrComp('ABC','123'));
  12.  WriteLn('AnsiStrComp(''123'',''ABC'') = ',AnsiStrComp('123','ABC'));
  13.  WriteLn('AnsiStrComp(''ABC'',''abc'') = ',AnsiStrComp('ABC','abc'));
  14.  WriteLn('AnsiStrComp(''abc'',''ABC'') = ',AnsiStrComp('abc','ABC'));
  15. END.

on obtiendra le résultat suivant :

AnsiStrComp('Gladir','Gladir') = 0
AnsiStrComp('Gladir','Gladir.com') = -1
AnsiStrComp('Gladir.com','Gladir') = 1
AnsiStrComp('ABC','123') = 1
AnsiStrComp('123','ABC') = -1
AnsiStrComp('ABC','abc') = 1
AnsiStrComp('abc','ABC') = -1

Dernière mise à jour : Mercredi, le 18 février 2015