ANSICOMPARETEXT |
Compare des chaines de caractères texte |
|---|---|
| Delphi/Kylix/Lazarus | SysUtils |
Syntaxe
| Function AnsiCompareText(Const S1, S2:String):Integer; |
Paramètres
| Nom | Description |
|---|---|
| S1 | Ce paramètre permet d'indiquer le premier chaîne de caractères à comparer |
| S2 | Ce paramètre permet d'indiquer le deuxième chaîne de caractères à comparer |
Retour
| Valeur | Description |
|---|---|
| 0 ou supérieur | Ces valeurs indique que la première chaîne de caractères est supérieur à la deuxième. |
| 0 | Ces valeurs indique que la première chaîne de caractères est égale à la deuxième. |
| 0 ou inférieur | Ces valeurs indique que la première chaîne de caractères est inférieur à la deuxième. |
Description
Cette fonction retourne le résultat d'une comparaison entre deux chaînes de caractères, avec le pilote de langage, sans tenir compte des majuscule/minuscule. Ainsi, lorsqu'il comparera la même lettre minuscule avec la majuscule, il la considérera comme étant différente.
Remarques
- Cette fonction effectue des comparaisons avec des paramètres régionales, contrairement à la fonction CompareStr.
- Il ne fait aucune différence entre les minuscules et les majuscules, ainsi si vous effectuez une comparaison de «GLADIR = Gladir», cette fonction indiquera qu'elles sont égales.
Exemple
Voici un exemple montrant l'utilisation de cette fonction :
- Program AnsICompareTextSamples;
-
- {$APPTYPE CONSOLE}
-
- Uses SysUtils;
-
- BEGIN
- WriteLn('AnsiCompareText(''Gladir'',''Gladir'') = ',AnsiCompareText('Gladir','Gladir'));
- WriteLn('AnsiCompareText(''Gladir'',''Gladir.com'') = ',AnsiCompareText('Gladir','Gladir.com'));
- WriteLn('AnsiCompareText(''Gladir.com'',''Gladir'') = ',AnsiCompareText('Gladir.com','Gladir'));
- WriteLn('AnsiCompareText(''ABC'',''123'') = ',AnsiCompareText('ABC','123'));
- WriteLn('AnsiCompareText(''123'',''ABC'') = ',AnsiCompareText('123','ABC'));
- WriteLn('AnsiCompareText(''ABC'',''abc'') = ',AnsiCompareText('ABC','abc'));
- WriteLn('AnsiCompareText(''abc'',''ABC'') = ',AnsiCompareText('abc','ABC'));
- END.
on obtiendra le résultat suivant :
AnsiCompareText('Gladir','Gladir') = 0AnsiCompareText('Gladir','Gladir.com') = -1
AnsiCompareText('Gladir.com','Gladir') = 1
AnsiCompareText('ABC','123') = 1
AnsiCompareText('123','ABC') = -1
AnsiCompareText('ABC','abc') = 0
AnsiCompareText('abc','ABC') = 0
Voir également
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - AnsiCompareStr
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - CompareStr
Dernière mise à jour : Mercredi, le 18 février 2015