I have a long process that goes between SCAN and ENDSCAN of a cursor. The process goes in a click() method of a button. I placed the following code in the procedure:
set escape on
lStop = .F.
on escape lStop = .T.
select MyCursor
scan
DO MyProc()
doevents
if lStop
=messagebox("Cancel procedure",36,"Cancel?") = 7
exit
endif
endscanBut the =messagebox() never sees the action. What do you suggest?
Thank you.
"The creative process is nothing but a series of crises." Isaac Bashevis Singer
"My experience is that as soon as people are old enough to know better, they don't know anything at all." Oscar Wilde
"If a nation values anything more than freedom, it will lose its freedom; and the irony of it is that if it is comfort or money that it values more, it will lose that too." W.Somerset Maugham
