在下面的示例中,激活所创建的窗口,使用 woutput( ) 函数显示此活动输出窗口的名称,然后,关闭该窗口,并且从内存中删除。如果激活了另一个窗口,其名称则显示出来。如果没有激活另一个窗口,则显示信息,表明输出定向到 visual foxpro 主窗口。
define window woutput1 from 2,2 to 12,32 title 'output window'
activate window woutput1
wait window 'woutput1 window: ' + woutput( )
release window woutput1
if empty(woutput( ))
wait window 'output being directed to the main visual foxpro window'
else
wait window 'output window: ' + woutput( )
endif