4D v13

WR DELETE STYLESHEET

Home

 
4D Write v13
WR DELETE STYLESHEET

WR DELETE STYLESHEET 


 

WR DELETE STYLESHEET ( area ; stylesheetNum ) 
Parameter Type   Description
area  Longint in 4D Write area
stylesheetNum  Longint 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.

Example  

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

 
PROPERTIES 

Product: 4D
Theme: WR Style Sheet
Number: 89451

 
INDEX

Alphabetical list of commands

 
HISTORY 

Created: 4D Write 6.5