1,108
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
JIANXIN_LU 2003-05-16
- 打赏
- 举报
Close( Windowname )
ghost2008 2003-05-16
- 打赏
- 举报
抱歉,是一个主窗口,在它基础上打开了几个子窗口,不是MDI窗口与SHEET
tchatcha 2003-05-16
- 打赏
- 举报
下面代码是关闭所有MDI窗口的子窗口。（代码是写在菜单中的）
window lwActiveSheet, lwNextSheet
lwActiveSheet = PARENTWINDOW.GetActiveSheet()
lwNextSheet = PARENTWINDOW.GetNextSheet( lwActiveSheet )
DO WHILE IsValid(lwNextSheet)
CLOSE( lwNextSheet )
lwNextSheet = PARENTWINDOW.GetNextSheet( lwActiveSheet )
LOOP
CLOSE( lwActiveSheet )
window lwActiveSheet, lwNextSheet
lwActiveSheet = PARENTWINDOW.GetActiveSheet()
lwNextSheet = PARENTWINDOW.GetNextSheet( lwActiveSheet )
DO WHILE IsValid(lwNextSheet)
CLOSE( lwNextSheet )
lwNextSheet = PARENTWINDOW.GetNextSheet( lwActiveSheet )
LOOP
CLOSE( lwActiveSheet )
JIANXIN_LU 2003-05-16
- 打赏
- 举报
下面代码是关闭所有MDI窗口的子窗口。（代码是写在菜单中的）
window lwActiveSheet, lwNextSheet
lwActiveSheet = PARENTWINDOW.GetActiveSheet()
lwNextSheet = PARENTWINDOW.GetNextSheet( lwActiveSheet )
DO WHILE IsValid(lwNextSheet)
CLOSE( lwNextSheet )
lwNextSheet = PARENTWINDOW.GetNextSheet( lwActiveSheet )
LOOP
CLOSE( lwActiveSheet )
window lwActiveSheet, lwNextSheet
lwActiveSheet = PARENTWINDOW.GetActiveSheet()
lwNextSheet = PARENTWINDOW.GetNextSheet( lwActiveSheet )
DO WHILE IsValid(lwNextSheet)
CLOSE( lwNextSheet )
lwNextSheet = PARENTWINDOW.GetNextSheet( lwActiveSheet )
LOOP
CLOSE( lwActiveSheet )
