Tente assim: No exento onExit do edit coloque
Copy(edit1.text,1,8); Desta forma, vc pode fazer os testes necessários usando apenas os 8 primeiros caracteres do edit. []'s Gilson -----Mensagem original----- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Edison Garcia Enviada em: sexta-feira, 1 de setembro de 2006 22:31 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Como eliminar caracteres excedentes em um acept de TEdit Prezados colegas Estou quebrando a cabeça para resolver o seguinte problema: em uma TEdit onde espero receber uma string com 8 caracteres,faço um exame dos caracteres digitados e ao atingir length = 8, testo se é o que deveria ser digitado e estando OK, passo adiante para uma nova TEdit. Até ai tudo bem. Mas, se o usuário ao invez de digitar, resolver utilizar um scanner e ler um código de barras com mais de 8 caracteres, o que ocorre é que, os primeiros 8 caracteres são examinados e se aceitos, o sistema vai adiante, e coloca os caracteres excedentes lidos pelo scanner na TEdit seguinte, o que não quero e eventualmente leva a erro. O que quero é ler os primeiros 8 caracteres, examina-los e desprezar os eventualmente presentes caracteres excedentes. alguma sugestão ? obrigado Edison Garcia -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Links do Yahoo! Grupos -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> <*> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages <*> Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
