Langage de programmation - Free Pascal - Référence de procédures et fonctions

ADDCHAR	Ajout de caractères
Free Pascal	strutils

Syntaxe

Function AddChar(C:Char;Const S:string;N:Integer):string;

Paramètres

Nom	Description
C	Ce paramètre permet d'indiquer le caractère à ajouter.
S	Ce paramètre permet d'indiquer la chaîne de caractères à traiter.
N	Ce paramètre permet d'indiquer la longueur minimale que la chaîne de caractères doit avoir.

Description

Cette fonction permet d'ajouter des caractères à la gauche d'une chaîne de caractères avec une certaine longueur.

Remarque

La fonction AddChar ajoute des caractères (C) à gauche de S jusqu'à ce que la longueur N soit atteinte et renvoie la chaîne de caractères résultante. Si la longueur de S est déjà égale ou supérieure à N, aucun caractère n'est ajouté. La chaîne de caractères résultante peut être considérée comme une version alignée à droite de S, de longueur N.
Ajout d'un caractère à une chaîne de caractères : La fonction AddChar permet d'ajouter un caractère spécifique à la fin d'une chaîne de caractères. C'est une fonction utile pour manipuler dynamiquement des chaînes de caractères, notamment lorsqu'il est nécessaire d'ajouter des caractères sans modifier directement le contenu de la chaîne de caractères.
Paramètres simples : La fonction prend deux paramètres : une chaîne de caractères (S) à laquelle le caractère doit être ajouté, et un caractère (C) étant ajouté à la fin de la chaîne de caractères. Le type des paramètres est simple et direct, ce qui rend cette fonction facile à utiliser.
Manipulation de chaînes immutables : Dans certains langages de programmation, les chaînes de caractères sont immutables, mais en Free Pascal, les chaînes de caractères sont modifiables. AddChar permet d'effectuer cette modification sans avoir à gérer manuellement les allocations mémoire ou la modification de la chaîne de caractères.
Efficacité pour des ajouts multiples : Lorsqu'il est nécessaire d'ajouter plusieurs caractères à une chaîne, utiliser AddChar est plus efficace que de concaténer les caractères un par un à l'aide de l'opérateur +. Cela permet d'éviter les copies inutiles et améliore la performance lors de l'assemblage de longues chaînes de caractères.
Utilisation dans des boucles ou des processus de construction : AddChar est fréquemment utilisée dans des boucles ou des processus de construction de chaînes de caractères, comme lors de la génération de texte ou de la création de formats complexes. Par exemple, elle peut être utilisée pour construire des chaînes de caractères contenant des séquences de symboles ou de délimiteurs.
Éviter des erreurs de mémoire : L'utilisation de AddChar permet de s'assurer que la chaîne est manipulée de manière sécurisée. Contrairement à la manipulation manuelle des chaînes, cette fonction gère correctement l'allocation de mémoire nécessaire à l'ajout de nouveaux caractères, évitant ainsi des erreurs de gestion de mémoire.
Compatibilité avec différentes tailles de chaînes de caractères : La fonction est compatible avec des chaînes de toute longueur. Que la chaîne soit vide ou qu'elle contienne déjà plusieurs caractères, AddChar ajoutera simplement le caractère au bon endroit, sans nécessiter de logique supplémentaire pour gérer les tailles de chaîne de caractères.
Aide à la création de chaînes formatées : Lors de la création de chaînes formatées (par exemple, dans des applications de traitement de texte ou d'affichage dynamique), AddChar est un outil précieux pour ajouter des caractères au fur et à mesure que la chaîne se construit, en particulier dans des formats complexes comme les formats CSV ou JSON.

Exemples

L'exemple suivant permet d'ajouter un caractère à la fin d'une chaîne de caractères :



Uses StrUtils;

 
Var

 s:String;

 
BEGIN

 s:='Bonjour';

 s:=AddChar('!',s,Length(s)+1);

 WriteLn(s);  { Affiche "Bonjour!" }

END.

L'exemple suivant permet d'ajouter un caractère au début de la chaîne de caractères :



Uses StrUtils;

 
Var

 s:String;

 
BEGIN

 s:='Bonjour';

 s:=AddChar('H',s,1);

 WriteLn(s);  { Affiche "HBonjour" }

END.

L'exemple suivant permet d'ajouter un caractère à une position spécifique dans la chaîne de caractères :



Uses StrUtils;

 
Var

 s:String;

BEGIN

 s:='Bonjour';

 s:=AddChar('!', s, 6);  { Insère '!' à la position 6 }

 WriteLn(s);             { Affiche "Bonjou!r" }

END.

L'exemple suivant permet d'ajouter un caractère à une chaîne de caractères vide :



Uses StrUtils;

 
Var

 s:String;

 
BEGIN

 s:='';

 s:=AddChar('A', s, 1);

 WriteLn(s);  { Affiche "A" }

END.

L'exemple suivant permet d'ajouter plusieurs caractères à une chaîne dans une boucle :


	

Uses StrUtils;

 
Var

 i:Integer;

 s:String;

 
BEGIN

 s:='';

 For i:=1 to 5 do

  s:=AddChar(Chr(64 + i), s, Length(s) + 1);  { Ajoute les lettres 'A' à 'E' }

 WriteLn(s);  { Affiche "ABCDE" }

END.

Ce code ajoute successivement les caractères 'A' à 'E' à la fin de la chaîne de caractères.

L'exemple suivant permet de construire une chaîne de caractères avec des caractères spéciaux :



Uses StrUtils;

 
Var

 s:String;

 
BEGIN

 s:='Hello';

 s:=AddChar(' ', s,Length(s)+1);

 s:=AddChar('W', s,Length(s)+1);

 s:=AddChar('o', s,Length(s)+1);

 s:=AddChar('r', s,Length(s)+1);

 s:=AddChar('l', s,Length(s)+1);

 s:=AddChar('d', s,Length(s)+1);

 Writeln(s);  { Affiche "Hello World" }

END.

Il construit la chaîne "Hello World" en ajoutant chaque caractère un par un.

Cet exemple permet d'ajouter un caractère à une chaîne pour formater un JSON :



Uses StrUtils;

 
Var

 s:String;

 
BEGIN

 s:='{';

 s:=AddChar('"',s,Length(s)+1);

 s:=AddChar('n',s,Length(s)+1);

 s:=AddChar('a',s,Length(s)+1);

 s:=AddChar('m',s,Length(s)+1);

 s:=AddChar('e',s,Length(s)+1);

 s:=AddChar('"',s,Length(s)+1);

 s:=AddChar(':',s,Length(s)+1);

 s:=AddChar('"',s,Length(s)+1);

 s:=AddChar('A',s,Length(s)+1);

 s:=AddChar('l',s,Length(s)+1);

 s:=AddChar('i',s,Length(s)+1);

 s:=AddChar('c',s,Length(s)+1);

 s:=AddChar('e',s,Length(s)+1);

 s:=AddChar('"',s,Length(s)+1);

 s:=AddChar('}',s,Length(s)+1);

 WriteLn(s);  (* Affiche {"name":"Alice"} *)

END.

Dernière mise à jour : Lundi, le 24 Août 2020

Section courante

A propos

Section administrative du site

ADDCHAR

Syntaxe

Paramètres

Description

Remarque

Exemples