FORM Get current page
FORM Get current page {( * )} : Integer
| Parâmetro | Tipo | Descrição | |
|---|---|---|---|
| * | Operador | → | Retorna o número da página de subformulário atual |
| Resultado | Integer | ← | Número da página de formulário exibida atualmente |
Esse comando não é seguro para thread e não pode ser usado em código adequado.
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