funcao para bloquear teclado/mouse

[bortot]

existe atualmente uma funçao que ativa/desativa teclado/mouse?

[kapiaba]

No teclado, quereis desligar o que? Para o mouse, segue abaixo:

    IF XDESLIMOUSE = [S]
       //-> Desliga o Cursor do Mouse
       DESLIGA_RATO()
    ENDIF
	
    IF XDESLIMOUSE = [S]
       //-> Religa Cursor do Mouse
       RELIGA_RATO()
    ENDIF
	Function Desliga_Rato()
	   ShowCursor( 0 ) // Desliga Mouse Move
   SysRefresh()
   
Return Nil
	//-----------------------------------------------------------------------------
	Function Religa_Rato()
	   ShowCursor( 1 ) // Re-Liga Mouse Move //2
	   // Outra Opção
   //SetCursorPos( ( 1 ), ( 2 ) ) // Re-Liga Mouse Move
   SysRefresh()
	Return Nil
	//-----------------------------------------------------------------------------
	Function Canhotos()
	   // Inverte botao do Ratinho
   SwapMouseButton( 1 )  // Para Canhotos
	Return Nil
	//-----------------------------------------------------------------------------
	Function Destros()
	   // Volta ao Normal
   SwapMouseButton( 0 ) // Para Destros
	Return Nil
	DLL32 FUNCTION SwapMouseButton(swap AS 7) AS 7 PASCAL LIB "USER32.DLL"

[kapiaba]

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=7662&start=0

[bortot]

OBRIGADO KAPIABA PARA O MOUSE.

PARA O TECLADO PRECISO BLOQUEAR TOTALMENTE O TECLADO DURANTE A IMPRESSÃO DO CUPOM DO TEF PARA QUE

O OPERADOR DO PDV NAO INTERFIRA NO PROCESSAMENTO DO PDV.

[kapiaba]

Ai, você deve olhar as funcções da DLL, se tem isso. Ou simplesmnete trave o Leitor de códigos de barras.