Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Ubicar cursor en un TEdit (https://www.clubdelphi.com/foros/showthread.php?t=33971)

supermilloriver 21-07-2006 21:36:09

Ubicar cursor en un TEdit
 
Hola!
Lo que quiero hacer es lo siguiente:
Que cuando un TEdit reciba el foco, el cursor no se ubique al principio, como ocurre por defecto, sino, poder indicarle de alguna manera al componente en donde (posición dentro del string Text) ubicar el cursor (obvio, en caso de que el TEdit no esté vacío)...

Muchas gracias
Gabriel

Ruben_Cu 26-07-2006 00:19:52

Selstart
 
Hola supermilloriver, con el código de abajo logras que el caret se ubique antes del caracter 8 pues SelStart comienza a contar a partir de 0.
Si el número pasado es mayor que los caracteres del edit se ubica en el último.
Código Delphi [-]
procedure TForm1.Edit1Enter(Sender: TObject);
begin
        edit1.SelStart:=7;
end;
Espero te sea útil.
Saludos


La franja horaria es GMT +2. Ahora son las 21:12:11.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi