Retonar ao GET anterior "VK_UP" sem validar o get atual?

[Cezar]

Bom dia,

No clipper, para retornar ao GET anterior sem ter que validar o
atual, o procedimento era:

@ 10,10 get cNome valid testa( cNome )
read

function testa( cNome )
if lastkey() = K_UP <----------- Volta sem validar
return .T.
endif
if empty(cNome)
preencha com o nome!
return .F.
endif
return .t.

Ja tentei usar passar "oGet " para a func e oGet:SetFocus(), ON KEYDOWN só responde depois da validação....

Voces tem alguma sugestão de como fazer no HWGUI ??
Grato,
v_cez@...

[Cezar]

Ola,

Ao inves de LastKey() = k_ESC,

GetKeyState(VK_UP)


v_cez@yahoo.com.br

[Luciano Bonfim]

aproveitando o tópico, como faço para testar a tecla ESC dentro de um loop e sair do mesmo, deixa eu explicar melhor:

estou num BROWSE e nele tenho um botao para exportar o DBF para Excel, só que dentro do loop que varre o DBF para exportar para excel, quero ficar verificando se o usuário teclou ESC, se ele teclou eu cancelo a operaçäo voltanfo para o BROWSE. o lastkey() nao funcionou!!!!

Código: Selecionar todos

use DBF
go top
do while !eof()
   geraRegistroparaExcel()
   skip
   if lastkey()=27
      exit
   endif
enddo

Muito Obrigado

[Cezar]

ola,

if GetkeyState(VK_ESC) <> 0
exit
endif

v_cez@yahoo.com.br