Leitora de Codigo de Barras
Bom dia, tenho um problema que espero que alguem possa me ajudar, é o seguinte:
Estou desenvolvendo um sistema comercial e no form de vendas eu preciso ativar a leitora de codigo de barras para preencher os campos, mas em qual evento do form devo colocar para preencher os campos, sera que tem algum codigo key assccii da leitora de codigo de barras, pq se tiver fica facil...
Estou desenvolvendo um sistema comercial e no form de vendas eu preciso ativar a leitora de codigo de barras para preencher os campos, mas em qual evento do form devo colocar para preencher os campos, sera que tem algum codigo key assccii da leitora de codigo de barras, pq se tiver fica facil...
Mpolaco
Curtidas 0
Respostas
Cirilo
18/08/2003
Depende onde o leitor esta ligado...
No Teclado:
Utilize um TEdit, pois leitor funciona como um digitador. Tudo que você passar no leitor irá para o Tedit.
Na porta serial:
Neste caso você precisar de um componente para acesso à porta serial.
Exemplos e componente visite o site [url]www.veloso.kit.net/rs232.html[/url]
Na porta USB
Funciona da mesma maneira do teclado.
No Teclado:
Utilize um TEdit, pois leitor funciona como um digitador. Tudo que você passar no leitor irá para o Tedit.
Na porta serial:
Neste caso você precisar de um componente para acesso à porta serial.
Exemplos e componente visite o site [url]www.veloso.kit.net/rs232.html[/url]
Na porta USB
Funciona da mesma maneira do teclado.
GOSTEI 0
Janete
18/08/2003
No evendo OnChange do Edit, DBEdit ... vc coloca o seguinte:
try
SuaTabela.IndexFieldNames := ´CodProduto´;
SuaTabela.Editkey;
SuaTabela.FindNearest([Edit1.Text]);
SuaTabela.Refresh;
except
on EDBEngineError do
MessageDlg(´Erro na busca! Tente novamente.´, mtError,[mbOK], 0);
end;
então aparecerá o produto se estiver cadastrado. E este caso é para leitor q vai junto com o teclado.
Espero ter ajudado. :D
try
SuaTabela.IndexFieldNames := ´CodProduto´;
SuaTabela.Editkey;
SuaTabela.FindNearest([Edit1.Text]);
SuaTabela.Refresh;
except
on EDBEngineError do
MessageDlg(´Erro na busca! Tente novamente.´, mtError,[mbOK], 0);
end;
então aparecerá o produto se estiver cadastrado. E este caso é para leitor q vai junto com o teclado.
Espero ter ajudado. :D
GOSTEI 0
Mpolaco
18/08/2003
Eu consigo fazer a busca se o foco estiver em um edit, mas isso nao resolve o meu problema, ele deve funcionar em qualquer lugar que o foco estiver no form
GOSTEI 0
Cirilo
18/08/2003
Desculpe não entendi o que você quer fazer, porém você deve ter em mente que um leitor de barras ligado ao teclado é o mesmo que uma pessoa digitando. (apenas um digitador muito rápido)
Em seu FORM:
Caso o objeto focado aceite digitação, então receberá a leitura.
Se colocar um TLabel em foco e passar um documento não acontecerá nada.
Em seu FORM:
Caso o objeto focado aceite digitação, então receberá a leitura.
Se colocar um TLabel em foco e passar um documento não acontecerá nada.
GOSTEI 0