| 4D Write v15WR GET STYLESHEET TAB | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| 
 | 
    4D Write v15
 WR GET STYLESHEET TAB 
         | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| WR GET STYLESHEET TAB ( zone ; numFeuille ; numTab ; position ; justification ; caractèreConduite ) | ||||||||
| Paramètre | Type | Description | ||||||
| zone | Entier long |   | Zone 4D Write | |||||
| numFeuille | Entier long |   | Numéro de la feuille de style | |||||
| numTab | Entier long |   | Numéro de tabulation | |||||
| position | Entier long |   | Position de la tabulation | |||||
| justification | Entier |   | Valeur de justification de la tabulation | |||||
| caractèreConduite | Chaîne |   | Caractère de conduite choisi | |||||
La commande WR LIRE TAB FEUILLESTYLE permet de récupérer les paramètres de la tabulation de numéro numTab appartenant à la feuille de style numFeuille.
Pour connaître le nombre de tabulations de la feuille de style, vous pouvez utiliser WR Lire prop feuillestyle (Zone;NumFeuille;wr tabulation;PriseEnCompte) qui vous retourne le nombre de tabulations.
position est exprimé dans l'unité, à partir de la marge gauche du document (à ne pas confondre avec la marge du paragraphe).
justification contiendra le type de justification de la tabulation que vous lisez.
| Valeur | Justification | 
| 1 | Aligné à gauche | 
| 2 | Centré | 
| 3 | Aligné à droite | 
| 4 | Décimale | 
| 5 | Séparateur Vertical | 
caractèreConduite est un caractère dont le code doit être compris entre 33 et 127 (se référer à la table fournie dans le manuel Langage de 4D). Ce caractère est affiché dans la police de la tabulation. Si la chaîne est vide, il n'y a pas de caractère de conduite.
Vous souhaitez changer le type de ligne de fuite pour toutes les tabulations de vos feuilles de style qui en possèdent et remettre à jour votre document.
 $nbFeuilleStyle:=WR Count(LaZone;wr nb stylesheets)
 For($i;1;$nbFeuilleStyle)
    $NbTab:=WR Get stylesheet text prop(LaZone;$i;wr tab;$PriseEnCompte)
    If($NbTab#0)
       For($j;1;$NbTab)
          WR GET STYLESHEET TAB(LaZone;$i;$j;$Pos;$Justif;$CarCond)
          If($CarCond#"")
             WR SET STYLESHEET TAB(LaZone;$i;$j;$Pos;$Justif;Char(126))
          End if
       End for
       WR UPDATE STYLESHEET(LaZone;$i)
    End if
 End for
	Produit :  4D Write
	Thème :  WR Feuille de style
	Numéro :  
        89441
        
        
        
	
	Créé :  4D Write 6.5
	
	
	
	
	
	
	
	
	4D Write - Langage ( 4D Write v15)
	
	
	
	
	
	
	
 Ajouter un commentaire
Ajouter un commentaire