BLOCKINPUT

FFECHER 09/01/2014 08:49:59
#432845
Pessoal:
A função
Public Declare Function BlockInput Lib [Ô]user32[Ô] (ByVal fBlock As Long) As Long

Quando uso BLOCKINPUT true
bloqueia o tecla e mouse durante a execução de determinada rotina e com o comando False desbloqueia...
O meu problema é quando há um erro durante a execução da rotina... Tudo é bloqueado e só destrava quando pressiono CTRL+ALT+DEL.
Alguém tem a solução quando uma exceção de erro acontecer?
Obrigado,
Fernando
LIZA 09/01/2014 09:15:56
#432849
voce não usa o tratamento de erro ?, se usa, é só colocar o block com opção false na rotina de tratamento q vai tratar o erro e destravar teclado e mouse...
FFECHER 09/01/2014 09:43:07
#432857
Primeiramente obrigado pela ajuda,
Tentamos exatamente isso antes de pedir ajuda porem nao retornou para o erro .
MARCELO.TREZE 09/01/2014 10:07:32
#432862
Resposta escolhida
como você usou o tratamento de erro

pois é este mesmo o caminho

On Error Goto TrataErro

o código

TrataErro:
BlockInput = False
Tópico encerrado , respostas não são mais permitidas