| 4D Write v15WR UPDATE STYLESHEET | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| 
 | 
    4D Write v15
 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 | |||||
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.
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)
	Producto: 4D Write
	Tema: WR Hoja de estilo
	Número 
        89454
        
        
        
	
	Creado por: 4D Write 6.5
	
	
	
	
	
	
	
	
	4D Write - Lenguaje ( 4D Write v15)
	
	
	
	
	
	
	
 Añadir un comentario
Añadir un comentario