WR Remplacer

4D - Documentation   Français   English   German   4D Write, Commandes par thèmes   4D Write, Liste alphabétique des commandes   4D Write, Constantes par thèmes   Retour   Précédent   Suivant

version 6.5


WR Remplacer (zone; aChercher; remplacerPar; motEntier; majuscules; toutRemplacer; toutLeDoc) Entier long

ParamètreTypeDescription
zoneEntier longZone 4D Write
aChercherAlphaChaine à chercher
remplacerParAlphaChaîne de remplacement
motEntierEntierRechercher le mot entier
majusculesEntierTenir compte des majuscules
toutRemplacerEntier0=remplacer suivant
1=tout remplacer
toutLeDocEntier0=chercher après le curseur
1=chercher dans tout le document
RésultatEntier longNombre de remplacements effectués

Description

La commande WR Remplacer est une fonction permettant de simuler en partie le fonctionnement de la commande Remplacer dans le menu Edition de 4D Write.

Si motEntier est égal à 1, le mot, pour être trouvé, doit être entouré de caractères séparateurs (espaces, caractères de ponctuation…), sinon il peut faire partie d'une chaîne de caractères.

Si majuscules est égal à 1, la recherche tiendra compte des majuscules et ne trouvera pas "Bonjour" si vous lui demandez de chercher "BONJOUR".

Si toutRemplacer est égal à 1, le remplacement portera sur l'ensemble des occurrences du mot à remplacer, sinon elle ne portera que sur la première occurrence.

Si toutLeDoc est égal à 1, la recherche débutera à la position du curseur puis, une fois la fin du document atteinte, se poursuivra du début du texte jusqu'à la position du curseur. Sinon, la recherche s'arrêtera à la fin de document.

WR Remplacer renvoie le nombre d'occurrences remplacées.

Exemple

Vous souhaitez détecter et supprimer tous les espaces répétés superflus dans votre document :

      `On affecte la variable qui va servir pour la recherche et qui contiendra deux espaces consécutifs
   AChercher:="  "
      `Tant que l'on trouve des occurences
   Tant que(WR Chercher(LaZone;AChercher;0;0;1)=1)
         `On remplace l'espace double par un simple
      $n:=WR Remplacer(LaZone;AChercher;" ";0;0;1;0)
   Fin tant que 

Référence

WR SELECTIONNER.


4D - Documentation   Français   English   German   4D Write, Commandes par thèmes   4D Write, Liste alphabétique des commandes   4D Write, Constantes par thèmes   Retour   Précédent   Suivant