VTRestore - Resultado

VTRestore

 

Descrição

Exibe uma tela guardada

Sintaxe

VTRestore( <aTela> )

Parâmetros

ParNomeTipoDescriçãoDefaultObgRef
01aTelaArrayEspecifica uma variável que contem o conteúdo da tela a ser exibidaX

Retorno

RetornoTipoDescrição

Exemplo

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#INCLUDE "TOTVS.CH"
#INCLUDE "APVT100.CH"
 
User Function VTRestore()
Local cCliente := Space(6)
 
@ 0, 0 VTSAY "Selecione um Cliente" 
@ 1, 0 VTGET cCliente Picture "@!" VALID AllTrim( cCliente ) <> '' F3 'SA1'
VTRead
 
VTSave Screen To aTela
 
VTCLEAR
@ 0, 0 VTSAY "Selecionou: " + cCliente
VTPAUSE
 
VTRestore Screen From aTela
 
@ 2, 0 VTSAY "Restauro a tela: "
VTPAUSE
 
Return( Nil )

Resultado

VTRestore - Resultado

Informação Adicional

0 respostas

Deixe uma resposta

Want to join the discussion?
Feel free to contribute!

Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *