4D Write v16
WR SET DOC PROPERTY
WR SET DOC PROPERTY
| WR SET DOC PROPERTY ( area ; propriedade ; valor ) | ||||||||
| Parâmetro | Tipo | Descrição | ||||||
| area | Inteiro longo |
|
Área 4D Write | |||||
| propriedade | Inteiro |
|
Número da propriedade do documento a fixar | |||||
| valor | Inteiro longo |
|
Valor para a propriedade selecionada | |||||
O comando WR SET DOC PROPERTY permite modificar as propriedades do documento na área 4D Write referenciada por area.
O significado dado ao parâmetro valor depende do valor da propriedade utilizada. propriedade e valor podem ser definidos com constantes.
As constantes do tema "" são descritas a continuação.
As seguintes constantes podem ser utilizadas com WR SET DOC PROPERTY e WR Get doc property. Também pode utilizar as constantes do tema "" para definir os valores:
| Constante | Tipo | Valor |
| wr first page | Inteiro longo | 0 |
| wr view mode | Inteiro longo | 1 |
| wr view rulers | Inteiro longo | 2 |
| wr view frames | Inteiro longo | 3 |
| wr view headers | Inteiro longo | 4 |
| wr view footers | Inteiro longo | 5 |
| wr view pictures | Inteiro longo | 6 |
| wr view Hscrollbar | Inteiro longo | 7 |
| wr view Vscrollbar | Inteiro longo | 8 |
| wr view statusbar | Inteiro longo | 9 |
| wr view menubar | Inteiro longo | 10 |
| wr view standard palette | Inteiro longo | 11 |
| wr view format palette | Inteiro longo | 12 |
| wr view style palette | Inteiro longo | 13 |
| wr view borders palette | Inteiro longo | 14 |
| wr view invisible chars | Inteiro longo | 15 |
| wr view references | Inteiro longo | 16 |
| wr view column separators | Inteiro longo | 17 |
| wr different on first page | Inteiro longo | 18 |
| wr different left right pages | Inteiro longo | 19 |
| wr widow orphan | Inteiro longo | 20 |
| wr unit | Inteiro longo | 21 |
| wr default tab | Inteiro longo | 22 |
| wr language | Inteiro longo | 23 |
| wr number of columns | Inteiro longo | 24 |
| wr columns spacing | Inteiro longo | 25 |
| wr binding | Inteiro longo | 26 |
| wr opposite pages | Inteiro longo | 27 |
| wr right first page | Inteiro longo | 28 |
| wr text inside margin | Inteiro longo | 29 |
| wr text left margin | Inteiro longo | 29 |
| wr text outside margin | Inteiro longo | 30 |
| wr text right margin | Inteiro longo | 30 |
Se você selecionar a opção 'Primeira página diferente' na caixa de diálogo Preferências, as seguintes constantes devem ser utilizadas para todas as páginas exceto para a primeira:
| Constante | Tipo | Valor |
| wr text top margin | Inteiro longo | 31 |
| wr text bottom margin | Inteiro longo | 32 |
| wr header top margin | Inteiro longo | 33 |
| wr header bottom margin | Inteiro longo | 34 |
| wr footer top margin | Inteiro longo | 35 |
| wr footer bottom margin | Inteiro longo | 36 |
| wr paper width | Inteiro longo | 37 |
| wr paper height | Inteiro longo | 38 |
| wr dead left margin | Inteiro longo | 39 |
| wr dead top margin | Inteiro longo | 40 |
| wr printable width | Inteiro longo | 41 |
| wr printable height | Inteiro longo | 42 |
| wr data size | Inteiro longo | 43 |
| wr undo buffer size | Inteiro longo | 44 |
| wr horizontal splitter | Inteiro longo | 45 |
| wr vertical splitter | Inteiro longo | 46 |
| wr links color | Inteiro longo | 47 |
| wr visited links color | Inteiro longo | 48 |
| wr view frame area | Inteiro longo | 49 |
(*) Quando define o tamanho do papel por programação, 4D Write considera que trabalha com uma impressora "virtual". O programa estabelecerá as margens mortas em zero e a área de impressão será igual ao tamanho do papel. Esta função é útil para documentos que não estão destinados a serem impressos.
As seguintes constantes (50 a 59) devem ser utilizadas para a primeira página de seu documento quando se escolhe a opção 'Primeira página diferente' na caixa de diálogo Preferências.
| Constante | Tipo | Valor |
| wr view first page header | Inteiro longo | 50 |
| wr view first page footer | Inteiro longo | 51 |
| wr first page top margin | Inteiro longo | 52 |
| wr first page bottom margin | Inteiro longo | 53 |
| wr header 1st page top margin | Inteiro longo | 54 |
| wr header 1st page bottom mg | Inteiro longo | 55 |
| wr footer 1st page top margin | Inteiro longo | 56 |
| wr footer 1st page bottom mg | Inteiro longo | 57 |
| wr draft mode | Inteiro longo | 58 |
| wr column width | Inteiro longo | 59 |
Você quer mostrar uma área 4D Write em tela sem que os menus e as regras sejam visíveis:
If(Form event=On Load)
WR SET DOC PROPERTY(Area;wr view menubar;wr hidden)
WR SET DOC PROPERTY(Area;wr view rulers;wr hidden)
End ifEste método permite ao usuário mostrar ou ocultar as barras de deslocamento:
C_LONGINT(ScrollStatus)
ScrollStatus:=WR Get doc property(Area;wr Hscrollbar) `Constant=7
ScrollStatus:=ScrollStatus+WR Get doc property(Area;wr Vscrollbar) `Constant=8
If(ScrollStatus>0)
CONFIRM("Pelo menos se mostra uma barra de deslocamento, quer ocultar elas?")
If(OK=1)
WR SET DOC PROPERTY(Area;wr Hscrollbar;wr hidden)
WR SET DOC PROPERTY(Area;wr Vscrollbar;wr hidden)
End if
Else
CONFIRM("As barras de deslocamento estão ocultas, Quer mostrar elas?")
If(OK=1)
WR SET DOC PROPERTY(Area;wr Hscrollbar;wr displayed)
WR SET DOC PROPERTY(Area;wr Vscrollbar;wr displayed)
End if
End if
Produto: 4D Write
Tema: WR Controle da área
Número
89481
Modificado: 4D Write 6.5
4D Write - Linguagem ( 4D Write v16)
