foco p/ o proximo controle ao digitar o limite do textbox

Delphi

04/01/2005

No meu form tenho 2 textbox um de DDD e outro de Telefone, no textbox DDD, a propriedade maxlenght=2 e o campo só aceita números (trato isso no evento keypress).

Gostaria que ao se digitar no texbox DDD ecompletando as duas posições, o foco fosse para o textbox Telefone.

Obs: Não consegui achar o tópico pela busca do site.


Angela

Angela

Curtidas 0

Respostas

Angela

Angela

04/01/2005

sobe


GOSTEI 0
Titanius

Titanius

04/01/2005

Olha não é o jeito mais bonito de se fazer, porem funcionou aqui comigo:

No evento KeyPress do Edit voce insere

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
var
 s: string;
begin
  s := Edit1.Text;
  if Length(s) = (Edit1.MaxLength) then
  begin
    Key := #0;
    Perform(Wm_NextDlgCtl, 0, 0);
  end;
end;



com eu disse, não é bonito, porem funciona! :D

[]s


GOSTEI 0
POSTAR