Certo numero de caracteres depois pular pro form seguinte!

Delphi

01/01/2004

Olá pessoal,
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

Lipsil

Curtidas 0

Respostas

Tnaires

Tnaires

01/01/2004

Acredito q vc quer ajustar o foco para outro controle qdo o usuário digitar cinco caracteres no edit né?
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
Lipsil

Lipsil

01/01/2004

valew kra,.
é isso aí,
mas no caso, como seria num maskedit?


Obrigado


GOSTEI 0
Tnaires

Tnaires

01/01/2004

Putz, essa dúvida é cruel...
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
Demian Soares

Demian Soares

01/01/2004

para conseguir o que quer com o maskedit, va ate a propriedade

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
Lipsil

Lipsil

01/01/2004

Eu tb já pensei nisso, mas não funciona!!! :(

]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
Maicongabriel

Maicongabriel

01/01/2004

Amigo, faltou você pesquizar no forum !
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
POSTAR