>Well that just goes to show what I know. Are you being a Show-Off? :-) Please show when Show doesn't show.
Ah, I'm not a VFP Computer right now, and I can't remember for sure. Try this and tell me if you get a "Shown" in the output window:
loForm = CreateObject('NoShow')
define class noshow as form
name = noshow
function Show
lparam tnStyle
debugout "Shown"
dodefault(tnStyle)
endfunction
enddefine