4D Write v16WR GET WORDS |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D Write v16
WR GET WORDS
|
WR GET WORDS ( zone ; débutSel ; finSél ; smartCutPaste ) | ||||||||
Paramètre | Type | Description | ||||||
zone | Entier long |
![]() |
Zone 4D Write | |||||
débutSel | Entier long |
![]() |
Début du mot à retourner | |||||
finSél | Entier long |
![]() |
Fin du mot à retourner | |||||
smartCutPaste | Entier |
![]() |
1 si le dernier caractère est un espace, sinon 0 | |||||
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 :
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 SET SELECTION(LaZone;0;0)
`Comptons le nombre de mots contenus dans le document
NbMots:=WR Count(Zone;wr nb words)
`Traitons les mots un par un
For($i;1;NbMots)
`Récupérons la position du premier et dernier caractère du mot
WR GET WORDS(Zone;Debut;Pos)
`Repositionnons-nous après le dernier mot traité
WR SET SELECTION(LaZone;Pos;Pos)
End for
Produit : 4D Write
Thème : WR Gestion de texte
Numéro :
89465
Créé : 4D Write 6.5
4D Write - Langage ( 4D Write v16)