O problema é que o leitor de código de barras simula o teclado, mais caso vc queira segue abaixo:
vc coloca esta procedure antes do "Var" das variaveis globais. procedure BlockInput(ABlockInput : boolean); stdcall; external 'USER32.DLL'; depois pra usar basta: BlockInput(True); //bloqueia BlockInput(False); //desbloqueia Em 03/04/08, emanoel diego <[EMAIL PROTECTED]> escreveu: > > Boa Tarde > > Alguem sabe algum comando no delphi, para bloquear o teclado para o > usuário? > > Tenho um form, com 2 abas, em uma, vou passar um leitor de código de > barras > que aparecerá o número no edit, e quero bloquear o teclado para que o > usuário não digite nada nesse edit. > > [As partes desta mensagem que não continham texto foram removidas] > > > [As partes desta mensagem que não continham texto foram removidas]