Convite para um simples teste

[Itamar M. Lins Jr.]

Ola!
Senhores, usando o Harbour poderiam fazer este teste e reportar o resultado?

Código: Selecionar todos

//teste.prg
Function Main
  ? 'Pressione apenas a TECLA ALT'
  nKey := inkey(0)
  ? str(nKey)
wait

Compilar usando o hbmk2 teste.prg -gtwin
No meu computador esta saindo do inkey re retornando o número da tecla 31.

Saudações,
Itamar M. Lins Jr.

[asimoes]

Itamar,

Fiz o teste e não saiu do inkey(0)

O meu windows é 7 64

Compilei o harbour compilado: harbour-nightly-win.exe

[]´s

[Jairo Maia]

Olá Itamar,

Compilei com a versão que vc indicou: Harbour 2.1.0 e resultou ok. Nenhuma tecla neutra saiu do inkey, e retona o valor da última tecla digitada.

Abraços

[asimoes]

Itamar,

Fazendo o teste com CTRL PGUP, retorna o valor 31. Alt não retorna nada.

[]´s

[Itamar M. Lins Jr.]

Ola!
Obrigado pelos testes.
Nao entendi nada ate agora, porque meu note e na maquina do Alexandre Silva, o ALT e SHIFT estavam saindo do INKEY(0) e retornando 31.
Agora eu recompilei o Harbour e mudei o layout do teclado etc, e o problema sumiu.

Saudacoes,
Itamar M. Lins Jr.

[Mário Isa]

Continuando neste tópico de testar inkey()

Quando testo e clico com o botão do mouse (o botão usual) a tecla retornada é 1002
Se clico com o botão direito retorna 1004
Se duplo clique retorna
sE MOVIMENTO o mouse retorna 1001 (mas isso se for em modo-texto) se utilizo WVW o movimento do mouse não é sentido. Com a WVW retorna 0.
se aperto o botão do mouse ele retorna 1003 ou 1005.

Mas eu gostaria de poder "perceber" o roller do mouse / o botão do meio / aquele q a gente usa para "rolar" a tela para cima e para baixo.

Existe alguma .lib que proporcione isso?

Mário

[Itamar M. Lins Jr.]

Eu não uso a WVW, mas acredito que é só olhar na parte de tratamento das teclas e adicionar as demais teclas que faltem.

Saudações,
Itamar M. Lins Jr.