Programmation Delphi des routines de gestion des chaînes
Share
La fonction CompareText compare deux chaînes sans respecter la casse.
Déclaration:
une fonction CompareText (const S1, S2: chaîne): entier;
La description:
Compare deux chaînes sans respecter la casse.
La comparaison n'est PAS sensible à la casse et ne prend pas en compte les paramètres régionaux de Windows. La valeur entière renvoyée est inférieure à 0 si S1 est inférieure à S2, 0 si S1 est égale à S2, ou supérieure à 0 si S1 est supérieure à S2.
Cette fonction est obsolète, c'est-à-dire qu'elle ne doit pas être utilisée dans le nouveau code - existe uniquement pour la compatibilité descendante.
Exemple:
var s1, s2: chaîne; i: entier; s1: = 'Delphi'; s2: = 'Programmation'; i: = CompareText (s1, s2); //je
Fonction de copie
Renvoie une sous-chaîne d'une chaîne ou d'un segment d'un tableau dynamique.
Déclaration:
une fonction Copie (S; index, nombre: entier): chaîne;
une fonction Copie (S; index, nombre: entier): tableau;
La description:
Renvoie une sous-chaîne d'une chaîne ou d'un segment d'un tableau dynamique.
S est une expression d'un type chaîne ou tableau dynamique. Index et Count sont des expressions de type entier. Copy renvoie une chaîne contenant un nombre spécifié de caractères à partir d'une chaîne ou d'un sous-tableau contenant des éléments Count commençant par S [Index].
Si Index est supérieur à la longueur de S, Copy renvoie une chaîne de longueur nulle ("") ou un tableau vide.
Si Count spécifie plus de caractères ou d'éléments de tableau que disponibles, seuls les caractères ou éléments de S [Index] à la fin de S sont renvoyés.
Pour déterminer le nombre de caractères dans la chaîne, utilisez la fonction Longueur. Un moyen pratique de copier tous les éléments de S à partir de l'index de départ est d'utiliser MaxInt comme Count.
Exemple:
var s: chaîne; s: = 'DELPHI'; s: = Copie (s, 2,3); // s = 'ELP';
Procédure de suppression
Supprime une sous-chaîne d'une chaîne.
Déclaration:
procédure Supprimer(var S: chaîne; Index, Count: Integer)
La description:
Supprime le nombre de caractères d'une chaîne S, en commençant à l'index.
Delphi laisse la chaîne inchangée si l'index n'est pas positif ou supérieur au nombre de caractères après l'index. Si le nombre est supérieur au reste des caractères après l'index, le reste de la chaîne est supprimé.
Exemple:
var s: chaîne; s: = 'DELPHI'; Supprimer (s, 3,1) // s = DEPHI;
Fonction ExtractStrings
Remplit une liste de chaînes avec des sous-chaînes analysées à partir d'une liste délimitée.
Déclaration:
type TSysCharSet = ensemble de Carboniser;
une fonction ExtractStrings (Separators, WhiteSpace: TSysCharSet; Content: PChar; Strings: TStrings): Integer;
La description:
Remplit une liste de chaînes avec des sous-chaînes analysées à partir d'une liste délimitée.
Les séparateurs sont un ensemble de caractères utilisés comme délimiteurs, séparant les sous-chaînes, où les retours chariot, les caractères de nouvelle ligne et les guillemets (simples ou doubles) sont toujours traités comme des séparateurs. WhiteSpace est un ensemble de caractères à ignorer lors de l'analyse de contenu s'ils se produisent au début d'une chaîne. Le contenu est la chaîne terminée par un caractère nul à analyser en sous-chaînes. Chaînes est une liste de chaînes à laquelle toutes les sous-chaînes analysées à partir du contenu sont ajoutées. La fonction renvoie le nombre de chaînes ajoutées au paramètre Strings.
Exemple:
// exemple 1 - nécessite TMemo nommé "Memo1" ExtractStrings ([';', ','], ["], 'about: delphi; pascal, programmation', memo1.Lines); // entraînerait l'ajout de 3 chaînes à mémo: // about: delphi // pascal // programmation // exemple 2 ExtractStrings ([DateSeparator], ["], PChar (DateToStr (Now)), memo1.Lines); // se traduirait par 3 chaînes: jour mois et année de la date du filet // par exemple '06', '25', '2003'
Fonction LeftStr
Renvoie une chaîne contenant un nombre spécifié de caractères du côté gauche d'une chaîne.
Déclaration:
une fonction LeftStr (const AString: AnsiString; const Nombre: nombre entier): AnsiString;surcharge; une fonction LeftStr (const AString: WideString; const Nombre: Entier): WideString; surcharge;
La description:
Renvoie une chaîne contenant un nombre spécifié de caractères du côté gauche d'une chaîne.
AString représente une expression de chaîne à partir de laquelle les caractères les plus à gauche sont renvoyés. Count indique le nombre de caractères à renvoyer. Si 0, une chaîne de longueur nulle ("") est renvoyée. S'il est supérieur ou égal au nombre de caractères dans AString, la chaîne entière est renvoyée.
Exemple:
var s: chaîne; s: = 'À PROPOS DE LA PROGRAMMATION DELPHI'; s: = LeftStr (s, 5); // s = 'À PROPOS'
Fonction Longueur
Renvoie un entier contenant le nombre de caractères dans une chaîne ou le nombre d'éléments dans un tableau.
La description:
une fonction Longueur (const S: chaîne): entier
une fonction Longueur (const S: tableau): entier
Déclaration:
Renvoie un entier contenant le nombre de caractères dans une chaîne ou le nombre d'éléments dans un tableau.
Pour un tableau, Length (S) renvoie toujours Ord (High (S)) - Ord (Low (S)) + 1
Exemple:
var s: chaîne; i: entier; s: = 'DELPHI'; i: = longueur (s); // i = 6;
Fonction LowerCase
Renvoie une chaîne qui a été convertie en minuscules.
La description:
une fonction Minuscule(const S: chaîne): chaîne;
Déclaration:
Renvoie une chaîne qui a été convertie en minuscules.
LowerCase convertit uniquement les lettres majuscules en minuscules; toutes les lettres minuscules et les caractères non alphabétiques restent inchangés.
Exemple:
var s: chaîne; s: = 'DeLpHi'; s: = LowerCase (s); // s = 'delphi';
Fonction Pos
Renvoie un entier spécifiant la position de la première occurrence d'une chaîne dans une autre.
Déclaration:
une fonction Pos (Str, Source: chaîne): entier;
La description:
Renvoie un entier spécifiant la position de la première occurrence d'une chaîne dans une autre.
Pos recherche la première occurrence complète de Str dans Source. S'il en trouve un, il renvoie la position du caractère dans Source du premier caractère dans Str comme une valeur entière, sinon, il renvoie 0.
Pos est sensible à la casse.
Exemple:
var s: chaîne; i: entier; s: = 'PROGRAMMATION DELPHI'; i: = Pos ('HI PR', s); // i = 5; Fonction PosEx
Renvoie un entier spécifiant la position de la première occurrence d'une chaîne dans une autre, où la recherche commence à une position spécifiée.
Déclaration:
une fonction PosEx (Str, Source: chaîne, À partir de: cardinal = 1): entier;
La description:
Renvoie un entier spécifiant la position de la première occurrence d'une chaîne dans une autre, où la recherche commence à une position spécifiée.
PosEx recherche la première occurrence complète de Str dans Source, en commençant la recherche à StartFrom. S'il en trouve un, il renvoie la position du caractère dans Source du premier caractère dans Str comme une valeur entière, sinon, il renvoie 0. PosEx renvoie également 0 si StartFrom est supérieur à Length (Source) ou si StartPos est < 0
Exemple:
var s: chaîne; i: entier; s: = 'PROGRAMMATION DELPHI'; i: = PosEx ('HI PR', s, 4); // i = 1; Fonction QuotedStr
Renvoie la version citée d'une chaîne.
Déclaration:
une fonction QuotedStr (const S: chaîne): chaîne;
La description:
Renvoie la version citée d'une chaîne.
Un seul caractère de guillemet (') est inséré au début et à la fin de la chaîne S, et chaque caractère de guillemet simple dans la chaîne est répété.
Exemple:
var s: chaîne; s: = 'Delphi "s Pascal'; // ShowMessage renvoie le Pascal de Delphi s: = QuotedStr (s); // ShowMessage renvoie 'Delphi" s Pascal'
Fonction ReverseString
Renvoie une chaîne dans laquelle l'ordre des caractères d'une chaîne spécifiée est inversé.
Déclaration:
une fonction ReverseString (const Un string : chaîne): chaîne;
La description: Renvoie une chaîne dans laquelle l'ordre des caractères d'une chaîne spécifiée est inversé
Exemple:
var s: chaîne; s: = 'À PROPOS DE LA PROGRAMMATION DELPHI'; s: = chaîne (s) inverse (s); // s = 'GNIMMARGORP IHPLED TUOBA'
Fonction RightStr
Renvoie une chaîne contenant un nombre spécifié de caractères du côté droit d'une chaîne.
Déclaration:
une fonction RightStr (const AString: AnsiString; const Nombre: nombre entier): AnsiString;surcharge;
une fonction RightStr (const AString: WideString; const Nombre: Entier): WideString;surcharge;
La description:
Renvoie une chaîne contenant un nombre spécifié de caractères du côté droit d'une chaîne.
AString représente une expression de chaîne à partir de laquelle les caractères les plus à droite sont renvoyés. Count indique le nombre de caractères à renvoyer. S'il est supérieur ou égal au nombre de caractères dans AString, la chaîne entière est renvoyée.
Exemple:
var s: chaîne; s: = 'À PROPOS DE LA PROGRAMMATION DELPHI'; s: = RightStr (s, 5); // s = 'MMING'
Fonction StringReplace
Renvoie une chaîne dans laquelle une sous-chaîne spécifiée a été remplacée par une autre sous-chaîne.
Déclaration:
type TReplaceFlags = ensemble de (rfReplaceAll, rfIgnoreCase);
une fonction StringReplace (const S, OldStr, NewStr: chaîne; Drapeaux: TReplaceFlags): chaîne;
La description:
Renvoie une chaîne dans laquelle une sous-chaîne spécifiée a été remplacée par une autre sous-chaîne.
Si le paramètre Flags n'inclut pas rfReplaceAll, seule la première occurrence de OldStr dans S est remplacée. Sinon, toutes les instances de OldStr sont remplacées par NewStr.
Si le paramètre Flags inclut rfIgnoreCase, l'opération de comparaison est insensible à la casse.
Exemple:
var s: chaîne; s: = 'Les programmeurs VB adorent le site de programmation VB'; s: = ReplaceStr (s, 'VB', 'Delphi', [rfReplaceAll]); // s = 'Les programmeurs Delphi adorent le site de programmation Delphi';
Fonction Trim
Renvoie une chaîne contenant une copie d'une chaîne spécifiée sans espaces de début et de fin ni caractères de contrôle.
Déclaration: fonction Réduire(const S: chaîne): chaîne;
La description: Renvoie une chaîne contenant une copie d'une chaîne spécifiée sans espaces de début et de fin et caractères de contrôle non imprimables.
Exemple:
var s: chaîne; s: = 'Delphi'; s: = Trim (s); // s = 'Delphi';
Fonction UpperCase
Renvoie une chaîne qui a été convertie en majuscules.
Déclaration: fonction Majuscule(const S: chaîne): chaîne;
La description: Renvoie une chaîne qui a été convertie en majuscules.
UpperCase convertit uniquement les lettres minuscules en majuscules; toutes les lettres majuscules et les caractères non alphabétiques restent inchangés.
Exemple:
var s: chaîne; s: = 'DeLpHi'; s: = UpperCase (s); // s = 'DELPHI';
Procédure Val
Convertit une chaîne en valeur numérique.
Déclaration: procédure Val (const S: chaîne; var Résultat; var Code: entier);
La description:
Convertit une chaîne en valeur numérique.
S est une expression de type chaîne; il doit s'agir d'une séquence de caractères formant un nombre réel signé. L'argument Résultat peut être une variable entière ou à virgule flottante. Le code est nul si la conversion réussit. Si la chaîne n'est pas valide, l'index du caractère incriminé est stocké dans Code.
Val ne tient pas compte des paramètres locaux pour le séparateur décimal.
Exemple:
var s: chaîne; c, i: entier; s: = '1234'; Val (s, i, c); // i = 1234; // c = 0
