4D Write v14

WR FIXER TAB

Accueil

 
4D Write v14
WR FIXER TAB

WR FIXER TAB 


 

WR FIXER TAB ( zone ; numTab ; position ; alignement ; caractèreConduite ) 
Paramètre Type   Description
zone  Entier long in Zone 4D Write
numTab  Entier long in Numéro de tabulation
position  Entier long in Position de la tabulation
alignement  Entier in Valeur de justification de la tabulation
caractèreConduite  Chaîne in Caractère de conduite choisi

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. Pour ne pas modifier la justification de la tabulation, passez -1 dans ce paramètre. Sinon, vous pouvez utiliser les constantes suivantes, placées dans le thème “WR Tabulations” :

Constante Type Valeur Commentaire
wr tab gauche Entier long 1 Aligné à gauche
wr tab centrée Entier long 2 Centré
wr tab droite Entier long 3 Aligné à droite
wr tab décimale Entier long 4 Décimale
wr tab séparateur vertical Entier long 5 Séparateur Vertical

caractèreConduite peut être tout caractère affichable dont le code 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;280;$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)

 
PROPRIÉTÉS 

Produit : 4D Write
Thème : WR Tabulations
Numéro : 89478
Nom intl. : WR SET TAB

 
HISTORIQUE 

Créé : 4D Write 6.5

 
VOIR AUSSI  

WR FIXER TAB FEUILLESTYLE
WR LIRE TAB

 
UTILISATION DE L'ARTICLE

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)