|
|
|
|
|
|
|
|
|
|
version 6.5
WR LIRE MOTS (zone; débutMot; finMot; smartCutPaste)
| Paramètre | Type | Description | |
| zone | Entier long |  | Zone 4D Write |
| débutMot | Entier long |  | Début du mot à retourner |
| finMot | Entier long | | Fin du mot à retourner |
| smartCutPaste | Entier | | 1 si le dernier caractère est un espace, sinon 0 |
Description
La commande WR LIRE MOTS retourne la position du premier caractère du mot de début de sélection et la position du dernier caractère du mot de fin de sélection dans la zone, et précise si c'est un espace ou pas. Si aucun texte n'est sélectionné, débutMot et finMot renvoient les bornes du mot dans lequel est placé le curseur. Cette commande ne modifie pas la sélection.
Si la sélection commence en milieu de mot (ou entre le dernier caractère d'un mot et l'espace qui le suit immédiatement), débutMot renverra la position du premier caractère de ce mot.
Si la sélection finit en milieu de mot, deux cas peuvent se présenter :
• Si le mot est suivi d'un espace, finMot englobera l'espace et smartCutPaste renverra 1.
• Si le mot n'est pas suivi d'un espace, finMot englobera le dernier caractère de ce mot et smartCutPaste renverra 0.
Exemple :
L'exemple suivant permet de parcourir tous les mots du documents en récupérant leurs bornes.
`Plaçons le curseur au début de la zone WR FIXER SELECTION (LaZone;0;0) `Comptons le nombre de mots contenus dans le document NbMots:=WR Compter(Zone;wr nb mots) `Traitons les mots un par un Boucle ($i;1;NbMots) `Récupérons la position du premier et dernier caractère du mot WR LIRE MOTS(Zone;Debut;Pos) `Repositionnons-nous après le dernier mot traité WR FIXER SELECTION (LaZone;Pos;Pos) Fin de boucle
Référence
WR Lire texte, WR Lire texte selectionne.
|
|
|
|
|
|
|
|
|
|