>Hi
>
>When I click on menu item CLOSE I want to close all open forms except the one called STARTUP - how do I do this?
>
>Using VFP 6 & 7
>
>Thanks
>
>Colin Northway
Colin,
Try looping through the forms collection with something like
for each loForm in _VFP.Forms
if vartype(loForm) = "O" and pemstatus(loForm, "BaseClass", 5) and loForm.Baseclass = "Form" and loForm.Name != "Startup"
if !loForm.QueryUnload()
return .F.
endif
loForm.Release()
endif
endfor
HTH
Caroline
Caroline