version 6.5
WR SUPPRIMER TAB (zone; numTab)
Paramètre | Type | Description | |
zone | Entier long | Zone 4D Write | |
numTab | Entier long | Numéro de tabulation |
Description
La commande WR SUPPRIMER TAB permet de supprimer la tabulation de numéro numTab.
Attention : Si la sélection comporte plusieurs paragraphes, la numérotation est relative au dernier paragraphe sélectionné. Si d'autres tabulations sont situées à la même position que la tabulation supprimée, elles seront également supprimées.
Exemple
Vous voulez supprimer toutes les tabulations présentes dans votre document :
C_ENTIER LONG(LaZone;$i;$Nbtab;$uniforme) `Plaçons le curseur au début de la zone WR FIXER SELECTION(LaZone;0;0) `Comptons le nombre de paragraphes contenus dans le document NbParag:=WR Compter(LaZone;wr nb paragraphes) `Traitons les paragraphes un par un Boucle ($i;1;NbParag) `Récupérons la position du paragraphe WR LIRE PARAGRAPHES(LaZone;Debut;Pos) `Placons-nous à l'intérieur du paragraphe WR FIXER SELECTION(LaZone;Debut+1;Debut+1) `Récupérons le nombre de tabulations $Nbtab:=WR Lire propriete texte(LaZone;wr tabulation;$uniforme) Tant que ($Nbtab#0) WR SUPPRIMER TAB(LaZone;1) $Nbtab:=$Nbtab-1 Fin tant que `Repositionnons-nous après le dernier paragraphe traité WR FIXER SELECTION(LaZone;Pos;Pos) Fin de boucle
Référence
WR AJOUTER TAB, WR SUPPRIMER TAB FEUILLESTYLE.