4D Write v14

WR SUPPRIMER TAB

Accueil

 
4D Write v14
WR SUPPRIMER TAB

WR SUPPRIMER TAB 


 

WR SUPPRIMER TAB ( zone ; numTab ) 
Paramètre Type   Description
zone  Entier long in Zone 4D Write
numTab  Entier long in Numéro de tabulation

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

 
PROPRIÉTÉS 

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

 
HISTORIQUE 

Créé : 4D Write 6.5

 
VOIR AUSSI  

WR AJOUTER TAB
WR SUPPRIMER TAB FEUILLESTYLE

 
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)