FoxPro/Visual FoxPro - Cambiar Color al Resivir Enfoque

Hola quisiera saber cual es el truco de cambiar el color de fondo de un text cuando recibe el enfoque y cuando lo pierde restaurar al original

Para hacer esto es necesario trabajar con GotFocus() y LostFocus()

Ejemplo:

Para que cuando reciba el enfoque se muestre en color amarillo:

En el GotFocus() del Text1:
Thisform.text1.BackColor=rgb(255,255,128)

Para que cuando pierda el enfoque, digamos que el color era blanco:
En el LostFocus() del Text1:
Thisform.text1.BackColor=rgb(255,255,255)

Suerte►

Note;
Para que te ahorres codigo, Crea un Método y ahi escribes el codigo.

1. Crea una propiedad en el Form con el nombre v_color_orig valor ""

2.En el evento GotFocus del TextBox

thisform.v_color_orig = this.backcolor
this.backcolor = rgb(0,255,255) && el color que tu quieras

en el LostFocus del TextBox

this.backcolor = thisform.v_color_orig

Pon un K en la propiedad Format del texto.