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

Advpl VTLastKey

    Tipo: TELNET VT100
    Retorna o valor VTINKEY() da última tecla extraída do buffer de teclado
    Sintaxe
    VTLASTKEY() –> nCodInkey
    Retorna
    VTLASTKEY() retorna um n£mero de -39 a 386 que identifica o valor VTINKEY() da última tecla extraída do
    buffer de teclado.

    Descrição
    VTLASTKEY() ‚ uma função de tratamento de teclado que informa o valor VTINKEY() da última tecla capturada
    do buffer de teclado pela função VTINKEY(), ou por um estado de espera como VTREAD, VTPAUSE,
    VTACHOICE(),VTABROWSE ou VTDBBROWSE. VTLASTKEY() retorna seu valor corrente
    até que outra tecla seja capturada do buffer de teclado.
    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)
    If VTLastKey() == 27
    Return .f.
    Endif