>Function EscapeKey >LOCAL lnOldArea, lnRetval, llRet >lnRetval = Messagebox("Are you sure you want to cancel?",32+3, "Escape pressed") > >IF lnRetval = 6 && Yes > llRet = .T. >ELSE && No > llRet = .F. >ENDIF >RETURN llRet >>
Function EscapeKey #INCLUDE foxpro.h LOCAL lnRetval lnRetval = Messagebox("Are you sure you want to cancel?", MB_YESNOCANCEL+MB_ICONQUESTION, "Escape pressed") RETURN (lnRetVal = IDYES)