IF You want Your code

llpress_esc = .F.
SET ESCAPE OFF
DO WHILE NOT llpress_esc
   llpress_esc = (INKEY() == 27)
   ......
   ......
ENDDO

Update: Sorry Fabio not for You :o((((
>>Hi all
>>
>>I have the following piece of code to trap Escape key that sometimes work and at other times doesn't.
>>
>>llpress_esc = .F.
>>DO WHILE NOT llpress_esc
>> llpress_esc = INKEY()
>> ......
>> ......
>>ENDDO
>>
>>I would appreciate if anyone can shed some light on my problem. Thanks
>>
>>Best Regards
>
>

>local lEscape
>SET ESCAPE ON
>ON ESCAPE lEscape=.T.
>DO WHILE !m.lEscape
>   ....
>   DOEVENTS
>ENDDO
>SET ESCAPE OFF
>