Fórum Concatenação de Strings #152659

07/04/2003

0

Fiz uma função para o cadastramento de datas, onde no evento onkeyup do textbox, se o comprimento da propriedade text for 2, o sistema soma ao texto o caracter ´/´, mas após está soma de strings o cursor vai para o início do textbox e eu queria que ele continuasse na posição atual, ou seja, a mais a direita possível (como seu eu clicasse em END.)
Alguém sabe como posso posicionar o cursor no final do textbox?


Anonymous

Anonymous

Responder

Posts

07/04/2003

Gatoledo

Acredito que a melhor solução seria a utilização do TMaskEdit, utilizando a máscara para data.

Mas se você realmente desejar continuar com sua função, para resolver o problema coloque as seguintes instruções como sendo as últimas de sua função:

Edit1.SelStart := Length(Edit1.Text);
Edit1.SelLength := 0;

e defina a propriedade AutoSelect do Edit1 para False.

Boa Sorte.


Responder

Gostei + 0

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

Aceitar