4D Write v16WR Get stylesheet font |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D Write v16
WR Get stylesheet font
|
WR Get stylesheet font ( 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 :
ARRAY TEXT(TabPolice)
WR FONTS TO ARRAY(TabPolice)
$nbFeuilleStyle:=WR Count(LaZone;wr nb stylesheets)
For($i;1;$nbFeuilleStyle)
$Police:=WR Get stylesheet font(LaZone;$i)
If(($Police#"") & (Find in array(TabPolice;$Police)=0))
WR SET STYLESHEET FONT(LaZone;$i;"")
End if
End for
Produit : 4D Write
Thème : WR Feuille de style
Numéro :
89462
Créé : 4D Write 6.5
4D Write - Langage ( 4D Write v16)