Como bloqueo el teclado?

El_Raso · #1 11-12-2003

Tengo una aplicacion y quiero bloquearle el teclado... es un punto de venta y usa un lector de codigo de barra...

Tengo un cable de esos que parecen una Y (Y griega) donde en un extremo va el teclado y en otro el lector....

La pregunta es como bloqueo el teclado sin bloquear el lector?

Suena raro pero asi lo quiere el cliente....

roman · #2 11-12-2003

Esto quizá parezca broma pero es en serio. ¿Por qué no simplemente desconectan el teclado?

// Saludos

Nadie · #3 11-12-2003

Código:

procedure trabarelteclado;
begin
  asm
   in al,21h
   and al,not 2
   out 21h,al 
  end;
end;

pd: soy un groso :P

roman · #4 11-12-2003

Cita:

Nadie comentó:

Código:

procedimiento en ensamblador

Esto funcionaba en DOS pero no en Windows. Si quiere deshabilitar el teclado por código puede usar un 'hook' del teclado (buscar acerca de la función SetWindowsHookEx en la ayuda de la api de Windows)

// Saludos

Nadie · #5 12-12-2003

todos los codigos que pongo los pruebo antes, este codigo fue probado en delphi 4 bajo windows 98 y windows xp y funciona perfectamente en ambos casos, hay apis que bloquean el teclado que funcionan en uno y no en otro, jamas probe este codigo en d.o.s

vos lo probaste roman? no te andubo? o pensas que no anda porque es assebler?

roman · #6 12-12-2003

Cita:

Nadie comentó:
vos lo probaste roman? no te andubo? o pensas que no anda porque es assebler?

Pensé que no funcionaría no porque fuera ensamblador sino por el tipo de instrucciones. De cualquier forma lo probé en Windows2000 y me marca la exceptción "Privileged instruction". Ahora lo acabo de probar en Windows98 y no marca error pero tampoco hace nada.

// Saludos

Descendents · #7 12-12-2003

Si quereis saberlo en XP i delphi 7 me da un error al pasar por la primera linea, y me dice Privileged Instruction.
Un saludo