Pular para o conteúdo
Início » Advpl VTSave

Advpl VTSave

    Tipo: TELNET VT100
    Grava uma região de tela para posterior exibição
    Sintaxe
    VTSAVE (<nTopo>, <nEsquerda>, <nBase>, <nDireita>) –> cTela
    Parâmetros
    <nTopo>, <nEsquerda>, <nBase>, e <nDireita> definem as
    coordenadas da região de tela a ser gravada. Caso <nBase> ou
    <nDireita> seja maior do que VTMAXROW() ou VTMAXCOL(), a tela é cortada.
    Retorna
    VTSAVE () retorna a região de tela especificada na forma de uma cadeia de caracteres.
    Exemplo
    #include ‘apvt100.ch’
    aTela := VTSave(0,0,4,10)
    cVar1 := cVar2 := cVar3 := SPACE(10)
    @ 1, 1 VTSAY " Um :" VTGET cVar1 VALID !EMPTY(cVar1)
    @ 2, 1 VTSAY " Dois:" VTGET cVar2 WHEN RTRIM(cVar1) != "Um"
    @ 3, 1 VTSAY " Tres:" VTGET cVar3 VALID !EMPTY(cVar3)
    VTREAD
    VTRestore(0,0,4,10,aTela)