version 6.5
WR FIXER TAB (zone; numTab; position; justification; caractèreConduite)
Paramètre | Type | Description | |
zone | Entier long | Zone 4D Write | |
numTab | Entier long | Numéro de tabulation | |
position | Numérique | Position de la tabulation | |
justification | Entier | Valeur de justification de la tabulation | |
caractèreConduite | Alpha | Caractère de conduite choisi |
Description
La commande WR FIXER TAB permet de modifier les paramètres de la tabulation de numéro numTab en déplaçant la tabulation jusqu'à position et en fixant sa justification ainsi que son caractère de conduite.
Cette tabulation sera déplacée pour tous les paragraphes appartenant à la sélection courante. Si une tabulation existe déjà à cette position, elle sera remplacée par celle que vous venez de modifier.
position est exprimé dans l'unité courante, à partir de la marge gauche du document. Pour ne pas modifier la position de la tabulation, passez -1 dans ce paramètre.
justification contiendra le type de justification de la tabulation que vous modifiez. Vous pouvez utiliser indifféremment la valeur ou la constante :
Valeur | Constante | Justification du texte |
-1 | - | Pas de changement |
1 | wr tab gauche | Aligné à gauche |
2 | wr tab centrée | Centré |
3 | wr tab droite | Aligné à droite |
4 | wr tab décimale | Décimale |
5 | wr tab séparateur vertical | Séparateur vertical |
Note : La liste des tabulations et leur référence vous est fournie dans le thème de constantes "WR Tabulations". Vous pouvez indifféremment passer la valeur ou la constante.
caractèreConduite peut être tout caractère affichable dont le code ASCII est compris entre 33 et 127. Ce caractère est affiché dans la police de la tabulation modifiée.
Exemple
Dans votre sélection, vous voulez supprimer les tabulations se trouvant à 168 points et déplacer les tabulations de 252 points à 280 points en leur affectant '$' comme caractère de conduite :
C_ENTIER LONG(LaZone;$i;$Nbtab;$Unit;$uniforme;$Justif) C_REEL($Pos) C_ALPHA(2;$carConduite) $Nbtab:=WR Lire propriete texte(LaZone;wr tabulation;$uniforme) `Récupérons l'unité du document pour le rétablir en fin de traitement $Unit:=WR Lire propriete document(LaZone;wr unité) Si ($Unit#2) `Fixons temporairement l'unité en points si ce n'est pas l'unité courante WR FIXER PROPRIETE DOCUMENT(LaZone;wr unité;2) Fin de si $i:=1 Repeter WR LIRE TAB(LaZone;$i;$pos;$Justif;$carConduite) Au cas ou : ($Pos=168) `Nous voulons supprimer la tabulation se trouvant à 168 points WR SUPPRIMER TAB(LaZone;$i) $Nbtab:=$Nbtab-1 : ($Pos=252) `Vous voulez déplacer la tabulation qui est à 252 points et la mettre à 280 points WR FIXER TAB(LaZone;$i;350;$Justif;"$") $i:=$i+1 Fin de cas Jusque ($i=$Nbtab) `Rétablissons l'unité d'origine du document WR FIXER PROPRIETE DOCUMENT (LaZone;wr unité;$Unit)
Référence
WR FIXER TAB FEUILLESTYLE, WR LIRE TAB.