www.gusucode.com > mbctools 工具箱 matlab 源码程序 > mbctools/@mdevtestplan/DeleteDesign.m
function T=DeleteDesign(T,h); % TESTPLAN/DELETEDESIGN delete design and any data % Copyright 2000-2005 The MathWorks, Inc. and Ford Global Technologies, Inc. [Xp,Yp]= dataptr(T); if Xp~=0 freeptr(Xp); freeptr(Yp); T=AssignData(T,{xregpointer,xregpointer}); end T.Matched= 0; T.DataLink= xregpointer; pointer(T); if numChildren(T) if isempty(T.Responses) % store best models so we can build them again m= children(T,'Model'); for i=1:length(m) m{i}= reset(m{i}); end % if there are none we will rely on any previously set responses T.Responses = m; pointer(T); end % remove children from tree and delete ch=children(T); if nargin>1 && isBrowserProject(T) for i=1:length(ch); try h.treeview(ch(i),'remove'); end end end children(T,'delete'); end T= info(T);