Tipo: TELNET VT100
Atribui um bloco de ação a uma tecla
Sintaxe
VTSETKEY(, [<bA‡ao>]) –> bAcaoCorrente
Parâmetros
‚ o valor INKEY() da tecla a ser associada ou questionada.
especifica o bloco de código a ser automaticamente executado sempre que a tecla especificada for pressionada durante um estado de espera.
Retorna
VTSETKEY() retorna o bloco de ação correntemente associado a tecla especificada, ou NIL caso a tecla especificada nao esteja associada a um bloco.
Exemplo
#include ‘apvt100.ch’
bKeyAnt := VTSetKey(65,{|| teste()})
CCodigo := space(6)
@ 1, 1 VTGET cCodigo
VTREAD
VTSetKey(65,bKeyAnt)
RETURN
FUNCTION Teste()
@ 2,1 VTSay ‘TESTE’
RETURN NIL
Estude para provas de certificações em TI com os simulados Bynem