>for each loControl in thisform.controls > if inlist(proper(m.loControl.baseclass),'Combobox','Textbox','Editbox') > if not empty(m.loControl.value) > llReturn = .t. > exit > endif > endif > next>
thisform.activecontrol.SetFocus()?
>>>LOCAL llReturn >>>thisform.lIsClosing = .t. >>> >>>if type('THISFORM.ActiveControl') = 'O' and not ; >>> isnull(thisform.activecontrol) and PEMSTATUS(thisform.activecontrol,'valid',5) ; >>> and inlist(lower(thisform.activecontrol.baseclass),'textbox','editbox') >>> thisform.activecontrol.valid() >>>endif >>> >>>llReturn = dodefault() >>> >>>thisform.lIsClosing = .f. >>> >>>RETURN m.llReturn>>>