Travar teclado com a DLL da Elgin

[alaminojunior]

Minha gente, não encontrei função para travamento de teclado e mouse na DLL da Elgin ! É isso mesmo !?

[sygecom]

A função deveria esta na DLL ? eu uso a função abaixo em xharbour para travar e liberar o teclado e mouse.

TRAVATEC(.T.) // Trava o teclado
TRAVATEC(.F.) // Libera o teclado

Código: Selecionar todos

#pragma ENDDUMP

#pragma begindump
#include "windows.h"
#include "winable.h"
#include "hbapi.h"

HB_FUNC( TRAVATEC )
{
   BlockInput( hb_parl(1) );
}
#pragma enddump

[alaminojunior]

A função deveria esta na DLL ?

É que outros fabricantes como Daruma, Bematech, Sweda entre outros, disponibilizam esta função nas suas DLL´s. Mas eu estava procurando algo genérico assim mesmo.
Muito agradecido Leo. :{