Fórum Certo numero de caracteres depois pular pro form seguinte! #203827
01/01/2004
0
saberiam me dizer como fazer para dar um setfocus supondo que ele deveria ser ativado ao ser digitado 5 caracteres? como seria pra pular de edit nesse caso?
Obrigado
Lipsil
Curtir tópico
+ 0Posts
02/01/2004
Tnaires
Se for isso, escreva o seguinte:
procedure TForm1.Edit1Change(Sender: TObject); begin if Length(Edit1.Text) = 5 then // Aqui pode ser o número q vc quiser Componente.SetFocus; // O componente pode ser Edit, Form, etc end;
Esse é o evento OnChange do Edit.
Sucesso
Gostei + 0
02/01/2004
Lipsil
é isso aí,
mas no caso, como seria num maskedit?
Obrigado
Gostei + 0
03/01/2004
Tnaires
Eu tentei achar um jeito aqui mas num consegui...
Vou continuar tentando, e talvez algum usuário do fórum responda pra nós.
Té mais.
Gostei + 0
03/01/2004
Demian Soares
MaxLenght do componente e coloque ali a quantidade de caracteres que vc quer que seja editado.
depois no evento Onchhange do componente maskedit coloque o seguinte codigo..
if Length(MaskEdit1.Text)=5 then
BitBtn1.SetFocus;
depois do then vc manda o foco para aonde quiser...
Gostei + 0
21/01/2004
Lipsil
]alguem saberia um meio de fazer passar um maskedit depois de tipo 8 caracateres para fazer ele dar um setfocus em um edit seguinte?
Valew
Gostei + 0
21/01/2004
Maicongabriel
Esse mesma pergunta que você fez foi proposta e resolvida no dia 19/01/2004, ou seja, nesta ultima segunda-feira !
Veja :: [url]http://delphiforum.icft.com.br/forum/viewtopic.php?t=33022&highlight=maskedit[/url] :twisted:
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)