Version 6.5
WR DELETE STYLESHEET (Bereich; StilvorlageNr)
Parameter | Typ | Beschreibung | |
Bereich | Lange Ganzzahl | 4D Write Bereich | |
StilvorlageNr | Lange Ganzzahl | Nummer der Stilvorlage |
Beschreibung
Der Befehl WR DELETE STYLESHEET löscht die Stilvorlage mit der Nummer StilvorlageNr aus dem 4D Write Dokument Bereich.
Warnung: Stilvorlagen des Systems können Sie nicht löschen. Mit dem Befehl WR GET STYLESHEET INFO stellen Sie fest, ob die Stilvorlage geschützt ist und demzufolge nicht gelöscht werden kann.
Beispiel
Sie möchten alle nicht geschützten Stilvorlagen in Ihrem Dokument löschen:
C_LONGINT(Bereich) C_INTEGER(NbStyleSheet;$SheetNum) `Zähle Anzahl der Stilvorlagen NbStyleSheet:=WR Count(Bereich;wr nb stylesheets) $SheetNum:=1 For ($i;1;NbStyleSheet) WR GET STYLESHEET INFO (Bereich;$SheetNum;$Name;$ApplyTo;$Protected;$Shortcut) If ($Protected=0) `Ist Stilvorlage nicht geschützt... WR DELETE STYLESHEET (Bereich;$SheetNum) Else $SheetNum:=$SheetNum+1 End if End for