Estou com um problema bem básico e não descubro a causa... Preciso que o texto de dentro de um TEdit fique inteiro selecionado quando o campo receber foco. Nos tempos de Delphi 7 com VCL eu fazia apenas TEdit(Sender).SelLength := Length(TEdit(Sender).Text)
no evento OnEnter
. Agora com Delphi 10.2 e FireMonkey já tentei de várias maneiras diferentes, mas não funciona.
Exemplo:
procedure TfPrincipal.Edit1Enter(Sender: TObject);
begin
TEdit(Sender).SetFocus;
TEdit(Sender).SelStart := 0; // Ja tentei mudar este valor
TEdit(Sender).SelLength := Length(TEdit(Sender).Text); // Ja tentei mudar este valor também
end;
No Firemonkey funciona diferente?