www.gusucode.com > mbctools 工具箱 matlab 源码程序 > mbctools/@xregtools/@MBrowser/CloseSubFigures.m
function ok=CloseSubFigures(h) % CLOSESUBFIGURES Close any open sub-figure % % ok=CloseSubFigures(h) % % Copyright 2000-2013 The MathWorks, Inc. and Ford Global Technologies, Inc. % Created 5/12/2000 ok= 1; if ~isempty(h.SubFigures) fh=h.SubFigures; fh= findobj(fh(isgraphics(fh)),'flat','Visible','on'); fh= unique(fh); if ~isempty(fh) close(fh); fh= findobj(fh(isgraphics(fh)),'flat','Visible','on'); end ok= isempty(fh); h.SubFigures= h.SubFigures(isgraphics(h.SubFigures)); end