ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Edit no delphiXE2, Ajudem!!

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
RenatoJr2011
Novato
Novato


Registrado: Domingo, 7 de Agosto de 2011
Mensagens: 23
MensagemEnviada: Dom Jan 15, 2012 3:21 pm    Assunto: Edit no delphiXE2, Ajudem!! Responder com Citação
Olá pessoal, preciso tirar uma duvida, seguinte:

Tenho 2 edit, eu queria, que quando digitar 4 letras ou números na primeira edit o foco mudaria pra segunda edit.

Vlw, e já agradeço desde já.

Muito obrigado!

Eu uso delphi XE2.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
adriano_servitec
Colaborador
Colaborador


Registrado: Sexta-Feira, 30 de Janeiro de 2004
Mensagens: 17618
MensagemEnviada: Dom Jan 15, 2012 5:12 pm    Assunto: Re: Edit no delphiXE2, Ajudem!! Responder com Citação
RenatoJr2011 escreveu:
Olá pessoal, preciso tirar uma duvida, seguinte:

Tenho 2 edit, eu queria, que quando digitar 4 letras ou números na primeira edit o foco mudaria pra segunda edit.

Vlw, e já agradeço desde já.

Muito obrigado!

Eu uso delphi XE2.
Veja a função Length

Exemplo

Código:
procedure TForm1.Edit1Change(Sender: TObject);
begin
  if Length(Edit1.Text) > 3 then
    edit2.SetFocus;
end;

_________________
Jogo seu smartphone? Acesse o link e confira.
https://play.google.com/store/apps/details?id=br.com.couldsys.rockdrum
https://play.google.com/store/apps/details?id=br.com.couldsys.drumsetfree
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
leogazio
Colaborador
Colaborador


Registrado: Domingo, 18 de Fevereiro de 2007
Mensagens: 1047
Localização: Alto Paraná - PR
MensagemEnviada: Dom Jan 15, 2012 5:17 pm    Assunto: Re: Edit no delphiXE2, Ajudem!! Responder com Citação
RenatoJr2011 escreveu:
Olá pessoal, preciso tirar uma duvida, seguinte:

Tenho 2 edit, eu queria, que quando digitar 4 letras ou números na primeira edit o foco mudaria pra segunda edit.

Vlw, e já agradeço desde já.

Muito obrigado!

Eu uso delphi XE2.


Procura nos eventos do Edit aí "OnChange", ou seja, sempre que for atrubuido um valor diferente à propriedade Text, o evento dispara, sendo assim basta você implementar o seuginte dentro do procedure do evento;

Código:
if (Length((Sender as TEdit).Text) = 4) then
    OutroEdit.SetFocus;

_________________
Leonardo Gazio - Consultoria e Suporte a Desenvolvedores.

Suporte para todo o Brasil via;
E-mail: leonardogazio@delphimasters.com
Msn: lngsmattos@hotmail.com
Claro: (21) 7301-7243
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
RenatoJr2011
Novato
Novato


Registrado: Domingo, 7 de Agosto de 2011
Mensagens: 23
MensagemEnviada: Seg Jan 16, 2012 9:32 am    Assunto: Deu certo Responder com Citação
Obrigado pessoal deu certo!

Flw


Até a proxima!
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB