4D v13.4

FORM Get current page

Inicio

 
4D v13.4
FORM Get current page

FORM Get current page 


 

FORM Get current page {( * )} -> Resultado 
Parámetro Tipo   Descripción
Operador in Devuelve el número de página de subformulario actual
Resultado  Entero largo in Número de la página del formulario mostrada actualmente

El comando FORM Get current page devuelve el número de la página del formulario mostrada actualmente.

El parámetro * es útil cuando el comando se llama en el contexto de un subformulario en página que contiene varias páginas. En este caso, cuando pase este parámetro, el comando cambia la página del subformulario actual (la que llamó al comando). Por defecto, cuando se omite el parámetro *, el comando se aplica siempre al formulario padre.

Ejemplo  

En un formulario, cuando selecciona un comando de menú desde la barra de menú o cuando el formulario recibe una llamada de otro proceso, puede realizar diferentes acciones dependiendo de la página del formulario mostrada actualmente. En este ejemplo, usted escribe:

  ` Método de formulario [miTabla];"miForm"
 Case of
    :(Form event=On Load)
  ` ...
    :(Form event=On Unload)
  ` ...
    :(Form event=On Menu Selected)
       $vlNumeroMenu:=Menu selected>>16
       $vlNumeroCmdo:=Menu selected & 0xFFFF
       Case of
          :($vlNumeroMenu=...)
             Case of
                :($vlNumeroCmdo=...)
                :(FORM Get current page=1)
  ` Efectuar una acción apropiada para la página 1
                :(FORM Get current page=2)
  ` Efectuar una acción apropiada para la página 2
  ` ...
                :($vlItemNumber=...)
  ` ...
             End case
          :($vlMenuNumber=...)
  ` ...
       End case
    :(Form event=On Outside Call)
       Case of
          :(FORM Get current page=1)
  ` Dar una respuesta apropiada para la página 1
          :(FORM Get current page=2)
  ` Dar una respuesta apropiada para la página 2
       End case
  ` ...
 End case

 
PROPIEDADES 

Producto: 4D
Tema: Formularios
Número 276

 
INDEX

Lista alfabética de los comandos

 
HISTORIA 

New
Creado por: < 4D v6
Renombrar: 4D v12
Modificado: 4D v13

 
VER TAMBIÉN 

FORM FIRST PAGE
FORM GOTO PAGE
FORM LAST PAGE
FORM NEXT PAGE
FORM PREVIOUS PAGE