4D Write v16

WR GET WORDS

Accueil

 
4D Write v16
WR GET WORDS

WR GET WORDS 


 

WR GET WORDS ( zone ; débutSel ; finSél ; smartCutPaste ) 
Paramètre Type   Description
zone  Entier long in Zone 4D Write
débutSel  Entier long in Début du mot à retourner
finSél  Entier long in Fin du mot à retourner
smartCutPaste  Entier in 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 :

  • 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 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

 
PROPRIÉTÉS 

Produit : 4D Write
Thème : WR Gestion de texte
Numéro : 89465

 
HISTORIQUE 

Créé : 4D Write 6.5

 
UTILISATION DE L'ARTICLE

4D Write - Langage ( 4D Write v16)