You can also eliminate the overhead of the shape object by using the form's box() method to highlight the checkbox by using following timer.timer() code:

oObject = thisform.check1
thisform.drawWidth=2
thisform.CurrentX = oObject.Left - 1
thisform.CurrentY = oObject.Top + 5
thisform.box(oObject.Left + 13, oObject.Top + 20)

>Good idea. I Think I'll implement that.
>
>>You can also make this effect more 'cursor-like' by making it blink with a >timer. Try adding a timer with a 500 interval with the following code in the >timer event:
>
>>thisform.shape1.visible = ! thisform.shape1.visible
>
>>Then enable the timer on gotfocus(), and disable on lostfocus()