Como posicionar o cursor para o Final do Texto de um TEdit?
Fala galera de Delphi, tudo beleza?
Há situações que precisamos setar o foto para o final de um Edit, por exemplo, quando o campo vem com algum texto preenchido e queremos que o usuário complete a informação.
Bem, a solução é bem simples!
O TEdit possui uma propriedade SelStart, que é responsável por indicar onde o cursor deve estar.
Exemplo
1
2
| // Seta o foco para o oitavo caractere, se tiver.
Edit1.SelStart := 8; |
// Seta o foco para o oitavo caractere, se tiver.
Edit1.SelStart := 8;
Agora para setar para o final, vamos utilizar a função Length, que retorna o número de caracteres de uma string.
Assim, conforme o exemplo, vamos obter o efeito desejado.
1
2
3
4
| procedure Button1Click(Sender : TObject);
begin
Edit1.SelStart := Length( Edit1.Text );
end; |
procedure Button1Click(Sender : TObject);
begin
Edit1.SelStart := Length( Edit1.Text );
end;
A mesma ideia deve funcionar para componentes similares ao TEdit, como TMaskEdit, TLabeledEdit e etc.
Espero que seja útil a todos!
Dúvidas ou sugestões? Deixe o seu comentário!
Um abraço e até a próxima pessoal. Valeu!
-
Giovani Da Cruz
-
5.749 views
- 2 comentários
- 1 de dezembro de 2019
Está gostando do conteúdo? Considere pagar um cafezinho para nossa equipe!
Posts Relacionados - Continue Aprendendo
Muito bom!
Muito bacana o post