>>I use Lostfocus to Validate data in a Textbox and would not wish to validate if the user clicks on the QueryUnload to close a window. How do I detect this in VFP6 SP5 ? Bear in QueryUnload fires after Lostfocus and Mdown() always returns -1 if the Click is done on the Close Button or if the mouse is outside the active window ?
>
>You are better off, in my opinion, if you postpone all data validation until the user tries to save data. Then, you can give the user a list of conditions that are not fulfilled for saving the record.

********************************************************************
*  Description.......: CancelValidation
*  Calling Samples...:
*  Parameter List....:
*  Created by........: ideas by John Koziol /Cetin Basoz
*  Modified by.......: NN
********************************************************************
local llReturn, loObject

loObject = SYS(1270) && Object under mouse
IF VARTYPE(m.loObject) = "O"
	llReturn = lower(justext(sys(1272, m.loObject))) = "cmdcancel" and mdown()
ELSE
    llReturn = .f.
endif    	

return m.llReturn  or lastkey()= 46 or thisform.releasetype = 1 && Alt+C (shortcut for Cancel)

In the textbox.valid

local llReturn
llReturn = .t.
if not thisform.CancelValidation()
   ** Proceed with normal validation logic
endif