gz_open1.prg

来自「银行代发工资系统」· PRG 代码 · 共 6 行

*_screen.caption=str(wchild('screen'))
if wchild('screen')>2
  xx=messagebox("请将关闭其他窗口后，再选择打开文件...",0+48,"注意")
  else
  do form gz_open name gz_open
endif