FoxPro/Visual FoxPro - Resaltar el campo donde se va pasando

Hola a todos nuevamente

Tengo un cliente que tiene diferentes configuraciones de pantalla con Windows XP en distintas terminales.
Cuando ejecuta el programa que estoy intentando hacer se pierden porque no saben donde está el cursor (sobre todo en aquellas que tienen temas especiales o contrastes en la pantalla)

--> ¿Cómo se puede resolver esto de manera sencilla de manera que se remarque cada control cuando se hace foco en él?
(Si bien, nativamente esto es así, el contraste no resulta suficiente en algunos casos)

En alguno casos le puse K en format (seleccionar al entrar) pero si el campo está vacío no se nota
-->¿Se puede cambiar el tamaño del cursor que titila?

Muchas gracias

on mousemove

HOLA ANDREITA

Lo puedes hacer con la propiedad themes del text1

ejemplo

cuando el text1 tome el foco en el evento gotfocus

thisform.text1.themes=.f.

y cuando pierda el foco en el evento lostfocus

thiisform.text1.themes=.t.

o viceversa segun te agrade

OTRA ALTERNATIVA

es colocarle color al text1 cuando reciva y pierda en focos

ejemplo

cuando el text1 tome el foco en el evento gotfocus

thisform.text1.backcolor=rgb("225,255.255")

y cuando pierda el foco en el evento lostfocus

thiisform.text1..backcolor=rgb("225,255.000")

PD: Los colores en rgb que puse son numero al azar tu ve la combinacion que mas te sirva

espero te sirva

bye

Gracias a todos y especialmente a Andrés que era lo que preguntaba

Andrea, yo utilizo ese mismo proceso en mis sistemas y estoy de acuerdo con Andres, solo que está un posc mas estandarizado, ejemplo:

Creauna propiedad y llamala "Col1"

en el got focus del text1 escribes esto:

Thisform.col1=This.BackColor
This.BackColor=RGB(239,237,163)

y en LostFocus del mismo text1:

This.BackColor=RGB(255,255,128)

y asi en los demás objetos

Saludos