4D Write v12

WR SUPPRIMER FEUILLESTYLE

Accueil

 
4D Write v12
4D Write - Langage
WR Feuille de style
WR SUPPRIMER FEUILLESTYLE

 

WR SUPPRIMER FEUILLESTYLE 


 

WR SUPPRIMER FEUILLESTYLE ( zone ; numFeuille ) 
Paramètre Type   Description
zone  Entier long in 4D Write area
numFeuille  Entier long in Stylesheet number

The WR DELETE STYLESHEET command deletes the style sheet whose number was passed in styleSheetNum from the 4D Write area referenced by area. .

Warning: System style sheets cannot be deleted. You can use the WR GET STYLESHEET INFO command to determine if the style sheet is protected from deletion.

Exemple  

You want to delete each unprotected style sheets in your document:

 C_LONGINT(Area)
 C_INTEGER(NbStyleSheet;$SheetNum)
  `Counting number of style sheets
 NbStyleSheet:=WR Count(Area;wr nb stylesheets)
 $SheetNum:=1
 For($i;1;NbStyleSheet)
    WR GET STYLESHEET INFO(Area;$SheetNum;$Name;$ApplyTo;$Protected;$Shortcut)
    If($Protected=0) `If the style sheet is not protected...
       WR DELETE STYLESHEET(Area;$SheetNum)
    Else
       $SheetNum:=$SheetNum+1
    End if
 End for

 
PROPRIÉTÉS 

Produit : 4D Write
Thème : WR Feuille de style
Numéro : 89451
Nom intl. : WR DELETE STYLESHEET

 
HISTORIQUE 

Créé : 4D Write 6.5