ignorar tecla ESC

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

paiva_dbdc
Usuário Nível 3
Usuário Nível 3
Mensagens: 342
Registrado em: 12 Nov 2012 09:58
Localização: uberlandia mg

ignorar tecla ESC

Mensagem por paiva_dbdc »

BOa tarde.
em um grupo de gets

get a
get b
getc

READ

tem como ignorar o ESC fazer ele NAO ignorar os get ?

se não tiver jeito teria que fazer um
while e testar se deu esc voltar para o inicio rs

se pudesse star alguma coisa que anulasse o ESC seria o ideal

somente para uma rotina
Fernando queiroz
Usuário Nível 4
Usuário Nível 4
Mensagens: 783
Registrado em: 13 Nov 2014 00:41
Localização: Porto Alegre/RS

ignorar tecla ESC

Mensagem por Fernando queiroz »

tente com uma janela assim

INIT DIALOG oDlg TITLE "VENDAS" ;
ICON HIcon():Addresource('SGC_ICON') ;
AT 0, 0 SIZE 1360,768 CLIPPER NOEXIT NOEXITESC NOCLOSABLE ;

e coloquei uma tecla ou um buttom para sair
HARBOUR 3.2, HWGUI 2.23 B7, SEFAZCLASS, PDFClass, ADO + MariaDB/MySQL, RMChart, Python + FASTAPI , Android Kotlin
paiva_dbdc
Usuário Nível 3
Usuário Nível 3
Mensagens: 342
Registrado em: 12 Nov 2012 09:58
Localização: uberlandia mg

ignorar tecla ESC

Mensagem por paiva_dbdc »

BOa


é texto mesmo

coloquei dentro de um While rs funcionou +++ nao e´o ideal

o ideal seria setar alguma coisa a a classe READ ignorasse o esc

PAiva
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20416
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP
Curtiram: 1 vez

ignorar tecla ESC

Mensagem por JoséQuintas »

Teste:

SET ESCAPE OFF
José M. C. Quintas
Harbour 3.2, mingw, multithread, gtwvg, fivewin 25.12, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui), (hmg3), (hmg extended), (oohg), PNotepad, ASP, (Linux/Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Responder