WR LIRE PARAGRAPHES

4D Write v16

WR LIRE PARAGRAPHES


WR LIRE PARAGRAPHES ( zone ; débPar ; finPar )

Paramètre	Type	Description
zone	Entier long	Zone 4D Write
débPar	Entier long	Début du paragraphe à retourner
finPar	Entier long	Fin du paragraphe à retourner

Description

La commande WR LIRE PARAGRAPHES retourne la position du premier caractère du paragraphe dans lequel se trouve le début de la sélection et la position du retour chariot du dernier paragraphe appartenant à la sélection.

Exemple

L’exemple suivant permet de parcourir tous les paragraphes du document 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 paragraphes contenus dans le document

 NbParag:=WR Compter(Zone;wr nb paragraphes)

  `Traitons les paragraphes un par un

 Boucle($i;1;NbParag)

  `Récupérons la position du premier et dernier caractere du paragraphe

    WR LIRE PARAGRAPHES(Zone;Debut;Pos)

  `Repositionnons nous après le dernier paragraphe traité

    WR FIXER SELECTION(LaZone;Pos;Pos)

 Fin de boucle