I can use Sleep()

* Add this to the Column.MouseLeave event
LOCAL llST
This.Parent.ToolTipText= ""
llST=Thisform.ShowTips
Thisform.ShowTips= .F.  && now turn off currently displayed tip
*INKEY(.1)
=Sleep(100)
Thisform.ShowTips= llST

But you need test the Escape key.
Instead INKEY() use SET ESCAPE ON...

lcSESC=SET("ESCAPE")
lcOESC=ON("ESCAPE")

SET ESCAPE ON
ON ESCAPE llESC=.T.
llESC=.F.

* your code START
DO WHILE ((DATETIME() - ltStart) < 120) AND NOT llESC
ENDDO
* your code END

IF lcSESC="ON"
   SET ESCAPE ON
ELSE
   SET ESCAPE OFF
ENDIF
ON ESCAPE &lcOESC.

>>Hi Tommy,
>>
>>I got the same error message in this code MESSAGE# 1452217 and under VFP 9.0. I must use Sleep() instead INKEY().
>>
>>But in your case...
>>
>>MartinaJ
>>
>
>How do you do that? Code sample?
>
>Thanks!!