4D Doc Center : WR UPDATE STYLESHEET

4D Write v14

WR UPDATE STYLESHEET


WR UPDATE STYLESHEET ( area ; numHoja )

Parámetro	Tipo	Descripción
area	Entero largo	Área 4D Write
numHoja	Entero largo	Número de la hoja de estilo

Descripción

El comando WR UPDATE STYLESHEET actualiza el formato mostrado de todo el texto utilizando la hoja de estilo referenciada por numHoja en el área 4D Write referenciada por area. Después de que se ejecuta este comando, todo el texto formateado con el estilo referenciado será formateado de acuerdo con la definición actual de ese estilo.

Ejemplo

Usted quiere remplazar las tabulaciones en la hoja de estilo "LayoutPar" y actualizar las áreas de texto donde esa hoja de estilo se aplica:

  `Búsqueda del número de la hoja de estilo

 $StyleSheetNb:=WR Count(Area;wr nb stylesheets)

 For($i;1;$StyleSheetNb)

    WR GET STYLESHEET INFO(Area;$i;$Name;$ApplyTo;$Prot;$Shortcut)

    If($Name="LayoutPar")

       SheetNumber:=$i

    End if

 End for

  `Obteniendo el número de tabulaciones en la hoja de estilo

 $NbTab:=WR Get stylesheet text prop(Area;SheetNumber;wr tab;Apply)

  `Eliminar todas las tabulaciones

 For($i;1;$NbTab)

    WR DELETE STYLESHEET TAB(Area;SheetNumber;1)

 End for

  `Insertar nuevas tabulaciones

 WR ADD STYLESHEET TAB(Area;SheetNumber;10;wr left tab;Char(126))

 ...

  `Actualización de todo párrafo al que se aplica la hoja de estilo

 WR UPDATE STYLESHEET(Area;SheetNumber)