Puedes hacer
- Code: Select all Expand view
REDEFINE GET oGet VAR cTexto ID 1001 OF oDlg
oGet:bGotFocus :={|| oGet:SelectAll()}
Esto hará que cada vez que el control get tome el foco, se seleccione todo, y si escribes un texto nuevo se sobreescriba
REDEFINE GET oGet VAR cTexto ID 1001 OF oDlg
oGet:bGotFocus :={|| oGet:SelectAll()}