4D Doc Center : WR MISE A JOUR FEUILLESTYLE

4D Write v14

WR MISE A JOUR FEUILLESTYLE


WR MISE A JOUR FEUILLESTYLE ( zone ; numFeuille )

Paramètre	Type	Description
zone	Entier long	Zone 4D Write
numFeuille	Entier long	Numéro de la feuille de style

Description

La commande WR MISE A JOUR FEUILLESTYLE cherche dans le document tous les textes pour lesquels la feuille de style numFeuille a été appliquée. Pour tous ces textes, la feuille de style est à nouveau appliquée, modifiant d'éventuels changement de style ayant eu lieu depuis l'application du style.

Cette commande peut être appelée après une modification de la feuille de style, pour que les parties du document qui utilisent cette feuille de style reflètent la nouvelle feuille de style.

Exemple

Vous souhaitez changer la présentation des tabulations dans la feuille de style 'FormatageParagraph' et remettre à jour toutes les parties de texte auxquelles cette feuille de style a été appliquée :

  `On recherche le numéro de la feuille de style

 $nbFeuilleStyle:=WR Compter(LaZone;wr nb feuilles de style)

 Boucle($i;1;$nbFeuilleStyle)

    WR LIRE INFO FEUILLESTYLE(LaZone;$i;$Nom;$AppliquéSur;$Protégé;$Raccourci)

    Si($Nom="FormatageParagraph")

       NumFeuille:=$i

    Fin de si

 Fin de boucle

  `On récupère le nombre de tabulations dans la feuille de style

 $NbTab:=WR Lire prop feuillestyle(LaZone;NumFeuille;wr tabulation;PriseEnCompte)

  `On les supprime toutes

 Boucle($i;1;$NbTab)

    WR SUPPRIMER TAB FEUILLESTYLE(LaZone;NumFeuille;1)

 Fin de boucle

  `On place les nouvelles tabulations

 WR AJOUTER TAB FEUILLESTYLE(LaZone;NumFeuille;10;wr tab gauche;Caractere(126))

 ...

  `Tout paragraphe possédant cette feuille de style doit utiliser ce nouveau formatage

 WR MISE A JOUR FEUILLESTYLE(LaZone;NumFeuille)