FORM Get current page

4D v16.3


FORM Get current page {( * )} -> Resultado

Parâmetro	Tipo	Descrição
*	Operador	Retorna o número da página de subformulário atual
Resultado	Inteiro longo	Número da página de formulário exibida atualmente

Descrição

O comando FORM Get current page retorna o número da página atual do formulário mostrado atualmente ou do formulário atual carregado via o comando FORM LOAD.

O parâmetro * é útil quando o comando é chamado no contexto de um subformulário em página que contém muitas páginas. Neste caso, quando passar este parâmetro, o comando muda a página do subformulário atual (a que chamou o comando). Por padrão, quando o parâmetro * é omitido, o comando é sempre aplicado ao formulário pai.

Exemplo

Em um formulário, se seleciona um comando de menu da barra de menu ou quando o formulário recebe uma chamada de outro processo, pode realizar diferentes ações dependendo da página do formulário mostrada atualmente. Neste exemplo, você escreve:

  ` Método de formulário [minhaTabela];"meuForm"

 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)

  ` Efetuar uma ação apropriada para a página 1

                :(FORM Get current page=2)

  ` Efetuar uma ação apropriada para a página 2

  ` ...

                :($vlItemNumber=...)

  ` ...

             End case

          :($vlMenuNumber=...)

  ` ...

       End case

    :(Form event=On Outside Call)

       Case of

          :(FORM Get current page=1)

  ` Dar uma resposta apropriada para a página 1

          :(FORM Get current page=2)

  ` Dar uma resposta apropriada para a página 2

       End case

  ` ...

 End case

Ver também

FIRST PAGE
FORM GOTO PAGE
LAST PAGE
NEXT PAGE
PREVIOUS PAGE