4D Write v14

WR DELETE STYLESHEET

Página Inicial

 
4D Write v14
WR DELETE STYLESHEET

WR DELETE STYLESHEET 


 

WR DELETE STYLESHEET ( area ; numFolha ) 
Parâmetro Tipo   Descrição
area  Inteiro longo in Área 4D Write
numFolha  Inteiro longo in Número da folha de estilo

O comando WR DELETE STYLESHEET apaga a folha de estilo cujo número é passado em numFolha da área 4D Write referenciada por area.

Atenção: As folhas de estilo do sistema não podem ser apagadas. Pode utilizar o comando WR GET STYLESHEET INFO para determinar se a folha de estilo está protegida.

Exemplo  

Você quer apagar todas as folhas de estilo não protegidas em seu documento:

 C_LONGINT(Area)
 C_INTEGER(NbStyleSheet;$SheetNum)
  `Contagem do número de folhas de estilo
 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) `Se a folha de estilo não está protegida...
       WR DELETE STYLESHEET(Area;$SheetNum)
    Else
       $SheetNum:=$SheetNum+1
    End if
 End for

 
PROPRIEDADES 

Produto: 4D Write
Tema: WR Folha de estilo
Número 89451

 
HISTÓRIA 

Criado por: 4D Write 6.5

 
ARTICLE USAGE

4D Write - Linguagem ( 4D Write v11.6)
4D Write - Linguagem ( 4D Write v12)
4D Write - Linguagem ( 4D Write v14)
4D Write - Linguagem ( 4D v13)
4D Write - Linguagem ( 4D Write v14 R2)
4D Write - Linguagem ( 4D Write v14 R3)
4D Write - Linguagem ( 4D Write v14 R4)