Tecla shift

crpsp · Mensagem por **crpsp** » 26 Abr 2006 00:19

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

digitom · Mensagem por **digitom** » 26 Abr 2006 12:46

Vê se este topico resolve o seu problema

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

crpsp · Mensagem por **crpsp** » 26 Abr 2006 13:52

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.

digitom · Mensagem por **digitom** » 26 Abr 2006 18:00

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ã.

digitom · Mensagem por **digitom** » 27 Abr 2006 13:57

:? 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)