Saltar para o conteúdo principal
Versão: 20 R7 BETA

FORM Get current page

FORM Get current page {( * )} : Integer

ParâmetroTipoDescrição
*OperadorRetorna o número da página de subformulário atual
ResultadoIntegerNú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

Propriedades

Número do comando276
Thread-seguro