Ir ao conteúdo
  • Cadastre-se
juniordaf

codigo de barras no Editbox

Recommended Posts

Preciso comparar 2 codigos de barras. como se faz para que ao completar os 14 digitos do primeiro codigo de barras na primeira caixa Edit ele passe para o segundo Edit automaticamente (tipo setfocus). Não consigo passar automáticamente, tenho que estar clicando com o mouse na proxima caixa para ler o proximo codigo de barras. Outra coisa, após comparar os 2 codigos de barras, devo armazenar apenas os 2 penultimos digitos do codigo (12° digito e 13° digito) em uma variável.

Compartilhar este post


Link para o post
Compartilhar em outros sites

No OnChange do Edit:

if Length(Edit1.Text) = 14 then

ProximoEdit.SetFocus;

Pra armazenar os dígitos:

Variavel := Edit1.Text[12] + Edit1.Text[13];

Compartilhar este post


Link para o post
Compartilhar em outros sites
No OnChange do Edit:

if Length(Edit1.Text) = 14 then

ProximoEdit.SetFocus;

Pra armazenar os dígitos:

Variavel := Edit1.Text[12] + Edit1.Text[13];

Ok Thiago valeu. Vou fazer assim.

Obrigado!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora





Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×