请教：两个顶层表单（form1,from2) 如何用命令指定，一个表单在前，一个在后
我用这个方法时灵时不灵
PUBLIC pform,pform2
pform1=0
pform2=0
For lnFor=1 to _VFP.Forms.Count
    if  _VFP.Forms(lnFor).name=''
        pform1=lnFor
    ENDIF
ENDFOR
For lnFor=1 to _VFP.Forms.Count
    if  _VFP.Forms(lnFor).name='form2'
        pform2=lnFor
    ENDIF
ENDFOR
然后我就和这个方式来控制那个在最前面
_VFP.Forms(pform2).AlwaysOnTop=.f.
_VFP.Forms(pform).AlwaysOnTop=.t.
  

用于定时切换两个表单的显示。这两个表单没有最大最小关闭按钮没有caption，直接都是全屏。一个显示1分钟，然后另一个显示15秒，以此循环展示数据

[此贴子已经被作者于2024-5-8 13:17编辑过]

大佬，我改成这样没有一点效果，不知什么地方写错了
PUBLIC pform,pform2
pform1=0
pform2=0
For lnFor=1 to _VFP.Forms.Count
    if  _VFP.Forms(lnFor).name='form1'
        pform1=lnFor
    ENDIF
ENDFOR
For lnFor=1 to _VFP.Forms.Count
    if  _VFP.Forms(lnFor).name='form2'
        pform2=lnFor
    ENDIF
ENDFOR

_VFP.Forms(pform2).zorder(0)
_VFP.Forms(pform1).zorder(1)

用visible的方法也是我最早的方法，这个方法不行，可能是定时器的原因，到秒时没有及时show hide导致出问题。现在用了其他方法已实现