再接“关于手写菜单的问题”

[LogoGEN]

http://expert.csdn.net/Expert/topic/1984/1984210.xml?temp=.4643366

之前的问题解决了`~

但我现在想在点菜单后打开一个表单，点另一个菜单时就更改一个参数，再刷新表单，应该怎么做？？
另外想问问通过菜单关闭当前表单用什么方法？

[fj_jiangqi]

改成这样试试看
if type('_screen.ActiveForm')='O'
_screen.ActiveForm.release()
endif
_screen.ActiveForm表示当然vfp激活的form。
如果你当前没有激活任何form，type('_screen.ActiveForm')#'O'，则就不会运行。
其实也可以调用系统菜单的close。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[LogoGEN]

强~~~~
接分~~~~
谢谢了`~~`

[fj_jiangqi]

参数是会变化的，你可以用宏替换。如：
menu_3_5_run='do form formname with xxx'
在菜单中运行部分改成&menu_3_5_run就可以了。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[fj_jiangqi]

菜单只能用命令方式，暂时不能使用过程~~
－－－－－－－－
你可以写在文件里，让它去调用就ok了。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[fj_jiangqi]

菜单更改参数要重定义菜单。
刷新表单：
do form formname nane formname_p && 先前运行的表单加个表单名
formname_p.refresh() &&便能刷新表单。
formname_p.release() &&关闭表单
在菜单中要关闭当前表单：
screen.ActiveForm.release()
送上一段代码给你调试吧。
你的问题我看的不是很明白，也许误解了你的意思，仅供参考！
关闭当前表单，你可以看看http://expert.csdn.net/Expert/topic/1992/1992103.xml里头的例子。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[LogoGEN]

还有一个比较重要的部分，就是我必须传递参数到form里面，而且根据我在前一个问题liujianjun_(流星尔) 的回答，菜单只能用命令方式，暂时不能使用过程~~

[LogoGEN]

我用你的这段代码测试：
g=_screen.ActiveForm
if type('g')='O'
g.release()
endif

竟然报错activeform不是一个对象，奇怪~