ENTER para Mudar Campo

Discussão sobre a Xailer

Moderador: Moderadores

Endrigo Rodrigues
Usuário Nível 1
Usuário Nível 1
Mensagens: 35
Registrado em: 27 Fev 2009 01:30
Localização: Belo Horizonte/MG

ENTER para Mudar Campo

Mensagem por Endrigo Rodrigues »

Olá.

Gostaria de saber o que tem que ser feito para que o ENTER funcione para mudar de campo?

xHarbour + Xailer
Imagem
Endrigo Rodrigues
Fantastsoft Sistemas
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Re: ENTER para Mudar Campo

Mensagem por sygecom »

Bom, no Xalier não sei, mas para quem quiser testar com Hwgui é só colocar a o comando CLIPPER no INIT DIALOG que já resolve.
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
MARINI
Usuário Nível 3
Usuário Nível 3
Mensagens: 288
Registrado em: 06 Jul 2004 08:06
Localização: Pindamonhangaba SP

Re: ENTER para Mudar Campo

Mensagem por MARINI »

Bom dia,
No Xailer:
coloque no início de sua aplicação:

Application:lUseReturn := .T.

Estou usando e funciona.

Tenho também para mudar setas para cima ou para baixo mas não testei.
http://www2.xailer.com/cgi/dnewsweb.exe ... arch+Xover
Sds
Marini
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Re: ENTER para Mudar Campo

Mensagem por sygecom »

Legal Marini,
E se fosse para se comportar apenas em um FORM o ENTER , como seria ?
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
MARINI
Usuário Nível 3
Usuário Nível 3
Mensagens: 288
Registrado em: 06 Jul 2004 08:06
Localização: Pindamonhangaba SP

Re: ENTER para Mudar Campo

Mensagem por MARINI »

Bom dia,
Não entendi bem o que vc quis dizer com o ENTER em um Form.
Mas se tiver um Botão e o foco nele vc pode criar o evento OnChar e
nele colocar suas opções como?

IF nKey=13 //ENTER
..
ELSEIF nKEY=27 //ESC
...
ENDIF

E se seu botão tiver opção com números como 0-NÃO 1-SIM vc pode aciona-los também apenas digitando o número:

IF nKey=48 //0-NÃO
..
ELSEIF nKey=49 //1-SIM
...
ENDIF
Sds
Marini
Responder