4D Write v14

WR Create stylesheet

Página Inicial

 
4D Write v14
WR Create stylesheet

WR Create stylesheet 


 

WR Create stylesheet ( area ; nome ; aplicarA ; atalho ) -> Resultado 
Parâmetro Tipo   Descrição
area  Inteiro longo in Área 4D Write
nome  cadeia in Nome da folha de estilo
aplicarA  Inteiro longo in 0=caracteres 1=parágrafos
atalho  cadeia in Um caractere
Resultado  Inteiro longo in Número da folha de estilo

O comando WR Create stylesheet cria uma nova folha de estilos e devolve o número que lhe foi atribuído. As características da nova folha de estilos são fixadas pelos parâmetros nome, aplicarA e atalho. Pode modificar a folha de estilo utilizando os comandos WR SET STYLESHEET TEXT PROP, WR SET STYLESHEET FONT, WR SET STYLESHEET TAB e o número de referencia de folha de estilos.

nome: O nome de uma folha de estilo não deve exceder os 31 caracteres.

No parâmetro aplicarA, pode passar uma das seguintes constantes, que se encontram no tema WR Parameters:

Constante Tipo Valor
wr apply to characters Inteiro longo 0
wr apply to paragraphs Inteiro longo 1

Quando se aplica aos parágrafos, começa com o primeiro parágrafo em sua seleção e se aplica até o final do último parágrafo desta seleção. Se omitido aplicarA, a folha de estilo será aplicado aos caracteres.

O parâmetro opcional atalho permite atribuir um atalho do teclado à folha de estilos. Só aceita um caractere. Para utilizar o atalho terá que pressionar a tecla passada neste parâmetro com a tecla Ctrl (em Windows) ou a tecla Comando (Mac OS). Se recomenda utilizar um número com o propósito de evitar todo conflito com os atalhos de teclado padrão de 4D Write.

Se é omitido atalho ou se trata de uma cadeia vazia, nenhum atalho será atribuído a folha de estilos.

Exemplo  

Você quer adicionar a cada documento sua própria folha de estilo de caracteres personalizados e aplicar ela a seleção. A folha de estilo se atribui ao atalho Comando+1 em Mac OS e Ctrl+1 em Windows. A fonte utilizada é Comic Sans MS 12 pontos.

 $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)

 
PROPRIEDADES 

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

 
HISTÓRIA 

Criado por: 4D Write 6.5

 
VER TAMBÉM 

WR APPLY STYLESHEET
WR DELETE STYLESHEET
WR UPDATE STYLESHEET

 
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)