4D Write v16

WR Create stylesheet

Inicio

 
4D Write v16
WR Create stylesheet

WR Create stylesheet 


 

WR Create stylesheet ( area ; nombre ; aplicarA ; atajo ) -> Resultado 
Parámetro Tipo   Descripción
area  Entero largo in Área 4D Write
nombre  Cadena in Nombre de la hoja de estilo
aplicarA  Entero largo in 0=caracteres 1=párrafos
atajo  Cadena in Un carácter
Resultado  Entero largo in Número de la hoja de estilo

El comando WR Create stylesheet crea una nueva hoja de estilos y devuelve el número que le fue asignado. Las características de la nueva hoja de estilos son fijadas por los parámetros nombre, aplicarA y atajo. Puede modificar la hoja de estilo utilizando los comandos WR SET STYLESHEET TEXT PROP, WR SET STYLESHEET FONT, WR SET STYLESHEET TAB y el número de referencia de hoja de estilos.

nombre: el nombre de una hoja de estilo no debe exceder los 31 caracteres.

En el parámetro aplicarA, puede pasar una de las siguientes constantes, que se encuentran en el tema WR Parámetros:

Constante Tipo Valor
wr apply to characters Entero largo 0
wr apply to paragraphs Entero largo 1

Cuando se aplica a los párrafos, comienza con el primer párrafo en su selección y se aplica hasta el final del último párrafo de esta selección. Si se omite aplicarA, la hoja de estilo se aplicará a los caracteres.

El parámetro opcional atajo permite asignar un atajo de teclado a la hoja de estilos. Sólo acepta un carácter. Para utilizar el atajo tendrá que presionar la tecla pasada en este parámetro con la tecla Ctrl (en Windows) o la tecla Comando (Mac OS). Se recomienda utilizar un número con el fin de evitar todo conflicto con los atajos de teclado estándar de 4D Write.

Si se omite atajo o si se trata de una cadena vacía, ningún atajo se asignará a la hoja de estilos.

Ejemplo  

Usted quiere añadir a cada documento su propia hoja de estilo de caracteres personalizados y aplicarla a la selección. La hoja de estilo se asigna al atajo Comando+1 en Mac OS y Ctrl+1 en Windows. La fuente utilizada es Comic Sans MS 12 puntos.

 $NumSheet:=WR Create stylesheet(Area;"MyOwnStyle";wr apply to characters;"1")
 WR SET STYLESHEET FONT(Area;$NumSheet;"Comic Sans MS")
 WR SET STYLESHEET TEXT PROP(Area;$NumSheet;wr font size;12;1)
 WR EXECUTE COMMAND(Area;wr cmd select all)
 WR APPLY STYLESHEET(Area;$NumSheet)



Ver también 

WR APPLY STYLESHEET
WR DELETE STYLESHEET
WR UPDATE STYLESHEET

 
PROPIEDADES 

Producto: 4D Write
Tema: WR Hoja de estilo
Número 89491

 
HISTORIA 

Creado por: 4D Write 6.5

 
ARTICLE USAGE

4D Write - Lenguaje ( 4D Write v16)