Section courante

A propos

Section administrative du site

STRINGREPLACE

Remplacement de chaine de caractères
Delphi/Kylix/Lazarus SysUtils

Syntaxe

Function StringReplace(Const S:String; Const OldPattern:String;Const NewPattern:String; Flags:TReplaceFlags):String;

Paramètres

Nom Description
S Ce paramètre permet d'indiquer la chaîne de caractères à traiter
OldPattern Ce paramètre permet d'indiquer la sous-chaîne de caractères à rechercher
NewPattern Ce paramètre permet d'indiquer la sous-chaîne de caractères à mettre à la place de la vieille.
Flags Ce paramètre permet d'indiquer les méthodes de remplacement.

Description

Cette fonction permet de remplacer des sous-chaînes de caractères par d'autres sous-chaînes de caractères. Il effectue sa recherche de la gauche vers la droite et arrête après le premier élément rencontré si rfReplaceAll n'est pas spécifié.

Remarques

Exemples

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

  1. Program StringReplaceSamples;
  2.  
  3. {$APPTYPE Console}
  4. Uses SysUtils;
  5.  
  6. BEGIN
  7.  WriteLn('Replace(""64.6"",""."","","") = ',StringReplace('64.6','.',',',[]));
  8.  WriteLn('Replace(""M. Maltais"",""M."",""Monsieur"") = ',StringReplace('M. Maltais','M.','Monsieur',[]));
  9. END.

on obtiendra le résultat suivant :

Replace("64.6",".",",") = 64,6
Replace("M. Maltais","M.","Monsieur") = Monsieur Maltais

Voici quelques exemples permettent de supprimer les espaces entre les mots :

  1. Program RemoveSpaces;
  2.  
  3. {$APPTYPE Console}
  4. Uses SysUtils;
  5.  
  6. BEGIN
  7.  WriteLn('StringReplace("ABC DEF GHI"," ","",[]) = ',StringReplace('ABC DEF GHI',' ','',[]));
  8.  WriteLn('StringReplace("ABC DEF GHI"," ","",[]) = ',StringReplace('ABC DEF GHI',' ','',[rfReplaceAll]));
  9.  WriteLn('StringReplace("ABC DEF GHI"," ","",[]) = ',StringReplace('ABC / DEF / GHI',' ','',[]));
  10.  WriteLn('StringReplace("ABC DEF GHI"," ","",[]) = ',StringReplace('ABC / DEF / GHI',' ','',[rfReplaceAll]));
  11. END.

on obtiendra le résultat suivant :

StringReplace("ABC DEF GHI"," ","",[]) = ABCDEF GHI
StringReplace("ABC DEF GHI"," ","",[]) = ABCDEFGHI
StringReplace("ABC DEF GHI"," ","",[]) = ABC/ DEF / GHI
StringReplace("ABC DEF GHI"," ","",[]) = ABC/DEF/GHI

Voir également

Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - AnsiReplaceStr
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Concat
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Copy
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Delete
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Insert
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Move
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - StuffString
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - WrapText

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