version 6.5
WR Remplacer (zone; aChercher; remplacerPar; motEntier; majuscules; toutRemplacer; toutLeDoc) Entier long
| Paramètre | Type | Description | |
| zone | Entier long | Zone 4D Write | |
| aChercher | Alpha | Chaine à chercher | |
| remplacerPar | Alpha | Chaîne de remplacement | |
| motEntier | Entier | 0=partie de mot | |
| 1=rechercher le mot entier | |||
| majuscules | Entier | 0=ignorer majuscule | |
| 1=tenir compte des majuscules | |||
| toutRemplacer | Entier | 0=remplacer suivant | |
| 1=tout remplacer | |||
| toutLeDoc | Entier | 0=chercher après le curseur | |
| 1=chercher dans tout le document | |||
| Résultat | Entier long | Nombre 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.
Vous pouvez passer dans le paramètre motEntier l'une des constantes suivantes, placées dans le thème WR Paramètres :
| Constantes (valeur) | Description |
| wr partie de mot (0) | Le mot peut faire partie d'une chaîne de caractères |
| wr mot entier (1) | Pour être trouvé, le mot doit être entouré de caractères séparateurs |
| (espaces, caractères de ponctuation, etc.) |
Vous pouvez passer dans le paramètre majuscules l'une des constantes suivantes, placées dans le thème WR Paramètres :
| Constantes (valeur) | Description |
| wr ignorer majuscules (0) | La recherche ne tiendra pas compte des majuscules et trouvera |
| "Bonjour", "Bonjour", "BONJOUR"... si vous cherchez "BONJOUR" | |
| wr tenir compte des majuscules (1) | La recherche tiendra compte des majuscules et ne trouvera pas |
| "Bonjour" si vous cherchez "BONJOUR" |
Vous pouvez passer dans le paramètre toutRemplacer l'une des constantes suivantes, placées dans le thème WR Paramètres :
| Constantes (valeur) | Description |
| wr remplacer suivant (0) | Le remplacement portera uniquement sur la première occurrence du |
| mot à remplacer | |
| wr tout remplacer (1) | Le remplacement portera sur l'ensemble des occurrences |
Vous pouvez passer dans le paramètre toutLeDoc l'une des constantes suivantes, placées dans le thème WR Paramètres :
| Constantes (valeur) | Description |
| wr du curseur à la fin (0) | La recherche commence à la position du curseur puis s'arrêtera en |
| fin de document. | |
| wr tout le document (1) | La recherche commence à la position du curseur puis se poursuivra |
| du début du texte à la position du curseur. |
WR Remplacer retourne 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;wr partie de mot;wr ignorer majuscules;wr tout le document)=1) `On remplace l'espace double par un simple $n:=WR Remplacer(LaZone;AChercher;" ";wr partie de mot;wr ignorer majuscules;wr tout remplacer;wr tout le document) Fin tant que
Référence