Reference Guide > W Routines > WzClose Procedure
  

WzClose Procedure
Closes all VDA tools registered with the Tools Manager.
Usage
WzClose
Parameters
None.
Keywords
Tools — A string or string array of tool names to unregister and close. If this keyword is set only the tool names listed are unregistered.
Discussion
The string names in the Tools keyword ARE case sensitive and must match items in the list given by:
TmInit
tools = TmEnumerateToolNames()
PM, tools
Example
PRO BBOXCB, wid, which
   DECLARE FUNC, TmEnumerateToolNames
   DECLARE FUNC, TmGetTop
   CASE which OF
      1: BEGIN
            WzPlot, RANDOMN(s,100), Parent=wid, Xsize=300, $
               Ysize=300, Position=[100,200]
            WzPlot, HANNING(100), Parent=wid, Xsize=400, $
               Ysize=300, Position=[150,250]
            WzSurface, DIST(200), Parent=wid, Xsize=200, $
               Ysize=200, Position=[300, 400]
         END
      2: BEGIN
            TmInit
            tools = TmEnumerateToolNames()
            PM, tools, title='Open tools are:'
            WzClose, tools='WzPlot_0' 
            WzClose, tools=['WzPlot_1', 'WzSurface_0']
            WzClose
         END
   ENDCASE
END
 
PRO WZCLOSE_TEST
   topshell = WwInit('WzClose Test', 'WzClose Test', $
                 layout, /Vertical)
   button = WwButtonBox(layout, $
	            ['Create VDA Tools', 'Close All'], 'BBOXCB')
   status = WwSetValue(topshell, /Display)
   WwLoop
END

Version 2017.0
Copyright © 2017, Rogue Wave Software, Inc. All Rights Reserved.