DELPHI XE6 - CURSOR NO FINAL DO DBEDIT

OLÁ, ESTOU TENTANDO COLOCAR O CURSOR NO FINAL DE UM DBEDIT E NÃO CONSIGO, JÁ FIZ O SEGUINTE PROCEDIMENTO QUE É O PADRÃO...PORÉM NO XE6 ISSO NÃO FUNCIONA...

Colocar cursor no final do Edit ao receber o foco
No evento OnEnter do TDBEdit coloque:
procedure TForm1.Edit1Enter(Sender: TObject);
begin
DBEdit1.Selstart:= Length(DBEdit1.text);
end;