Página 1 de 1

Tecla shift

Enviado: 26 Abr 2006 00:19
por crpsp
Olá a todos. Sou iniciante em clipper e por necessidade estou fazendo um programinha que visa medir o tempo de reaçao de uma pessoa ao ouvir um sinal sonoro, porem esse tempo de reaçao deve ser contado do sinal sonoro até o soltar uma tecla, no caso a tecla SHIFT. Sei dos comandos ISBIT() e KBDSTAT(), mas nao estou consiguindo fazer funcionar. Alguem pode me ajudar.

Obrigado

Enviado: 26 Abr 2006 12:46
por digitom
Vê se este topico resolve o seu problema

https://pctoledo.org/forum/viewt ... f92e4ea170

tecla SHIFT

Enviado: 26 Abr 2006 13:52
por crpsp
Obrigado pela resposta. já vi esse topico mas nao responde o meu problema pq tem que apertar outra tecla junto com shift. Gostaria de algo que qdo a tecla SHIFT fosse solta inicia uma operaçao.

Enviado: 26 Abr 2006 18:00
por digitom
Tem uma LIB chamada FAST e outra APISTD, vou dar uma olhada nelas para ver se tem alguma coisa referente ao que você quer.
Se tiver eu lhe respondo amanhã.

Enviado: 27 Abr 2006 13:57
por digitom
:? Sei se é bem isto que você quer, mas na Lib FAST, a qual eu me referi, tem uma função chamada ISLSHIFT(). Ela verifica se tecla Shift esta pressionada.

Talvez funcione para você da seguinte forma:

Tempo_Inicial := Time()
Do While islShift() //Enquanto a tecla Shift Estiver pressionada
.....
enddo
Tempo_Final := Time()
Tempo_Total := Elaptime(Tempo_Inicial, Tempo_final)