| 4D Write v14WR Lire police feuillestyle | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| 
 | 
    4D Write v14
 WR Lire police feuillestyle 
         | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| WR Lire police feuillestyle ( zone ; numFeuille ) -> Résultat | ||||||||
| Paramètre | Type | Description | ||||||
| zone | Entier long |   | Zone 4D Write | |||||
| numFeuille | Entier long |   | Numéro de la feuille de style | |||||
| Résultat | Chaîne |   | Nom de la police de caractères définie pour numFeuille | |||||
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.
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
	Produit :  4D Write
	Thème :  WR Feuille de style
	Numéro :  
        89462
        
        
        
	Nom intl. :  WR Get stylesheet font
	Créé :  4D Write 6.5
WR FIXER POLICE FEUILLESTYLE
WR Lire police
	4D Write - Langage ( 4D Write v11.6)
	4D Write - Langage ( 4D Write v12)
	4D Write - Langage ( 4D Write v14)
	4D Write - Langage ( 4D v13)
	4D Write - Langage ( 4D Write v14 R2)
	4D Write - Langage ( 4D Write v14 R3)
	4D Write - Langage ( 4D Write v14 R4)