4D Write v16
WR SET DOC PROPERTY
WR SET DOC PROPERTY
| WR SET DOC PROPERTY ( area ; propiedad ; valor ) | ||||||||
| Parámetro | Tipo | Descripción | ||||||
| area | Entero largo |
|
Área 4D Write | |||||
| propiedad | Entero |
|
Número de la propiedad del documento a fijar | |||||
| valor | Entero largo |
|
Valor para la propiedad seleccionada | |||||
El comando WR SET DOC PROPERTY permite modificar las propiedades del documento en el área 4D Write referenciado por area.
El significado dado al parámetro valor depende del valor de la propiedad utilizada. propiedad y valor se pueden definir con constantes.
Las constantes del tema "WR Propiedades del documento" se describen a continuación.
Las siguientes constantes se pueden utilizar con WR SET DOC PROPERTY y WR Get doc property. También puede utilizar las constantes del tema "WR Parámetros" para definir los valores:
| Constante | Tipo | Valor |
| wr first page | Entero largo | 0 |
| wr view mode | Entero largo | 1 |
| wr view rulers | Entero largo | 2 |
| wr view frames | Entero largo | 3 |
| wr view headers | Entero largo | 4 |
| wr view footers | Entero largo | 5 |
| wr view pictures | Entero largo | 6 |
| wr view Hscrollbar | Entero largo | 7 |
| wr view Vscrollbar | Entero largo | 8 |
| wr view statusbar | Entero largo | 9 |
| wr view menubar | Entero largo | 10 |
| wr view standard palette | Entero largo | 11 |
| wr view format palette | Entero largo | 12 |
| wr view style palette | Entero largo | 13 |
| wr view borders palette | Entero largo | 14 |
| wr view invisible chars | Entero largo | 15 |
| wr view references | Entero largo | 16 |
| wr view column separators | Entero largo | 17 |
| wr different on first page | Entero largo | 18 |
| wr different left right pages | Entero largo | 19 |
| wr widow orphan | Entero largo | 20 |
| wr unit | Entero largo | 21 |
| wr default tab | Entero largo | 22 |
| wr language | Entero largo | 23 |
| wr number of columns | Entero largo | 24 |
| wr columns spacing | Entero largo | 25 |
| wr binding | Entero largo | 26 |
| wr opposite pages | Entero largo | 27 |
| wr right first page | Entero largo | 28 |
| wr text inside margin | Entero largo | 29 |
| wr text left margin | Entero largo | 29 |
| wr text outside margin | Entero largo | 30 |
| wr text right margin | Entero largo | 30 |
Si se selecciona la opción 'Primera página diferente' en la caja de diálogo Preferencias, las siguientes constantes se debe utilizar para todas las páginas excepto para la primera:
| Constante | Tipo | Valor |
| wr text top margin | Entero largo | 31 |
| wr text bottom margin | Entero largo | 32 |
| wr header top margin | Entero largo | 33 |
| wr header bottom margin | Entero largo | 34 |
| wr footer top margin | Entero largo | 35 |
| wr footer bottom margin | Entero largo | 36 |
| wr paper width | Entero largo | 37 |
| wr paper height | Entero largo | 38 |
| wr dead left margin | Entero largo | 39 |
| wr dead top margin | Entero largo | 40 |
| wr printable width | Entero largo | 41 |
| wr printable height | Entero largo | 42 |
| wr data size | Entero largo | 43 |
| wr undo buffer size | Entero largo | 44 |
| wr horizontal splitter | Entero largo | 45 |
| wr vertical splitter | Entero largo | 46 |
| wr links color | Entero largo | 47 |
| wr visited links color | Entero largo | 48 |
| wr view frame area | Entero largo | 49 |
(*) Cuando define el tamaño del papel por programación, 4D Write considera que se trabaja con una impresora "virtual". El programa establecerá los márgenes muertos en cero y el área de impresión será igual al tamaño del papel. Esta función es útil para documentos que no están destinados a ser impresos.
Las siguientes constantes (50 a 59) deben utilizarse para la primera página de su documento cuando se elige la opción 'Primera página diferente' en la caja de diálogo Preferencias.
| Constante | Tipo | Valor |
| wr view first page header | Entero largo | 50 |
| wr view first page footer | Entero largo | 51 |
| wr first page top margin | Entero largo | 52 |
| wr first page bottom margin | Entero largo | 53 |
| wr header 1st page top margin | Entero largo | 54 |
| wr header 1st page bottom mg | Entero largo | 55 |
| wr footer 1st page top margin | Entero largo | 56 |
| wr footer 1st page bottom mg | Entero largo | 57 |
| wr draft mode | Entero largo | 58 |
| wr column width | Entero largo | 59 |
Usted quiere mostrar un área 4D Write en pantalla sin que los menús y las reglas sean visibles:
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 al usuario mostrar u ocultar las barras de desplazamiento:
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("Al menos se muestra una barra de desplazamiento, ¿quiere ocultarlas?")
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("Las barras de desplazamiento están ocultas, ¿Quiere mostrarlas?")
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
Producto: 4D Write
Tema: WR Control del área
Número
89481
Modificado: 4D Write 6.5
4D Write - Lenguaje ( 4D Write v16)
