Tipo: Microterminal
Verifica se a ultima tecla pressionada no microterminal foi a DEL (consideramos como equivalente a <ESC> no
teclado normal).
Sintaxe
TerEsc()
Retorna
.T. se a ultima tecla pressionada foi <DEL> ou .F. se não foi
Exemplo
TerCls()
While .T.
cNome := Space(10)
TerSay(00,00,"Nome:")
TerGetRead(01,07,@cNome,"XXXXXXXXXX")
If TerEsc()
Exit
EndIf
EndDo
TerCls()
TerSay(01,00,"Finalizando…")