GARANTIR DESCONTO

Fórum Concatenar #314001

23/02/2006

0

Gostaria que depois de digitado uma letra, essa seria transferida para um edit e logo em seguida o focu seria enviado para esse edit e para o usuario continuar a digitar preciso enviar tb uma seta para direita como posso fazer isso?


  if (chr(Key) >= ´A´) and (chr(Key) <= ´Z´)  then
  begin
    ENome.SetFocus;
    ENome.Text := chr(Key);
  end;



Felipeiw

Felipeiw

Responder

Posts

23/02/2006

Massuda

A seta para direita é para o cursor ficar no fim do texto? se for, mais fácil fazer assim...
if (chr(Key) >= ´A´) and (chr(Key) <= ´Z´)  then 
  begin 
    ENome.SetFocus; 
    ENome.Text := chr(Key); 
    // não tenho certeza, talvez não precise do "+1"
    ENome.SelStart := Length(ENome.Text) + 1;  
  end; 



Responder

Gostei + 0

23/02/2006

Felipeiw

Exatamente isso, novamente mt obrigado !


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar