WR Lire police feuillestyle

4D - Documentation   Français   English   German   4D Write, Commandes par thèmes   4D Write, Liste alphabétique des commandes   4D Write, Constantes par thèmes   Retour   Précédent   Suivant

version 6.5


WR Lire police feuillestyle (zone; numFeuille) Alpha

ParamètreTypeDescription
zoneEntier longZone 4D Write
numFeuilleEntier longNuméro de la feuille de style
RésultatAlphaNom de la police de caractères définie
pour numFeuille

Description

La commande WR Lire police feuillestyle retourne le nom de la police de caractères qui a été définie pour la feuille de style numFeuille. Si aucune police n'est définie pour cette feuille de style, une chaîne vide est retournée.

Exemple

Vous souhaitez enlever l'attribut Police des feuilles de style pour lesquelles il a été défini, et lorsque la police n'est pas installée dans votre système :

   TABLEAU ALPHA(80;TabPolice)
   WR POLICES INSTALLEES(TabPolice)
   $nbFeuilleStyle:=WR Compter(LaZone;wr nb feuilles de style)
   Boucle ($i;1;$nbFeuilleStyle)
      $Police:=WR Lire police feuillestyle(LaZone;$i)
      Si (($Police#"") & (Chercher dans tableau(TabPolice;$Police)=0))
         WR FIXER POLICE FEUILLESTYLE(LaZone;$i;"")
      Fin de si 
   Fin de boucle

Référence

WR FIXER POLICE FEUILLESTYLE, WR Lire police.


4D - Documentation   Français   English   German   4D Write, Commandes par thèmes   4D Write, Liste alphabétique des commandes   4D Write, Constantes par thèmes   Retour   Précédent   Suivant