用顶层表单打开其他的表单在顶层表单窗口中运行，怎样判断正在运行的是哪个表单（也就是表单名）？
假设每次只能运行一个表单。

回复2楼

不行，不能返回正在运行的表单的文件名，它返回的是thisfrom的文件名！！也就是说，它不能返回正在thisfrom中运行的表单文件名！！！！

[ 本帖最后由 qshuju 于 2013-4-26 15:08 编辑 ]

我是想用顶层表单来判断正在运行的表单文件史称，因为程序的关闭是从顶层表单关闭的。

我现在正在测试，_screen没有关闭，就是提示 类型、数目无效。。。。

我是用顶层表单做主程序窗口，如果用_screen就又要改回来 ，太麻烦了。用了_screen，会在程序刚启动时闪一下的。

我是用顶层表单做程序主窗口，每次运行的都是模式表单，这样做的目的是让顶层表单中的菜单不可用，及避免表使用冲突的问题。。。我的水平有限。。。所以
当模式表单运行时，这时不关闭模式表单就直接退出主窗口会不能退出。为了结束这个正在运行的表单，我必须能判断用户是在操作哪个表单，然后：表单文件名.release —》再执行退出操作就可以退出了

在顶层表单的queryunlode事件中

？Justfname(Sys(1271,Thisform))
？JUSTFNAME(SYS(1271,_SCREEN.Forms(i))) 
IF MESSAGEBOX("确实要退出系统吗？",4+32,"提示信息")==6
CLEAR EVENTS
QUIT 
ELSE 
nodefault
endif

就会返回顶层表单的文件名，另一个就会显示错误
？？？

你试试，如果用你的form1做顶层表单，然后加入命令按钮click：do from form2.scx ，而form2是一个模式表单而且showwindow是在 顶层表单中，你再看一下Justfname(Sys(1271,Thisform))返回的是不是form2.scx,返回的还是form1.scx。而且这时候你不要关闭正在运行的form2就直接关闭那个做为程序主窗口的form1试试能不能关掉？

我的顶层表单会调用很多模式表单，我要知道用户最后调用的是哪个表单，有没有关闭。如果没有关闭，就要判断是哪个表单还在运行。当关闭主窗口的时候，就要先关闭这个模式表单，不然会退不了程序。

我是要关闭的时候 才判断的。我放在init事件干什么用？
我看还是用参数传递吧，看来 没有函数能够判断正运行在顶层表单中的表单文件名了。