www.gusucode.com > mbctools 工具箱 matlab 源码程序 > mbctools/@xregtools/@MBrowser/NewProject.m
function NewProject(h) %NEWPROJECT Create a new project in Model Browser % % NEWPROJECT(MB) creates a new project in the Model Browser. % Copyright 2000-2005 The MathWorks, Inc. and Ford Global Technologies, Inc. % Create new project (untitled) and deal with current project. ProjectPtr= h.RootNode; msgID=h.addStatusMsg('Closing current project...'); cnode=h.CurrentNode; OK=h.SelectNode(xregpointer); if OK ProjectPtr.setmodified(h.FileModified); [MP,msg,cancel]= close(ProjectPtr.info); if isempty(msg) && ~cancel delete(MP); File = mbcGetPath('mbcmodel', 'Projects', 'Untitled'); h.removeStatusMsg(msgID); msgID = h.addStatusMsg(['Opening file: ' File]); MP = mdevproject(File,[],[]); p = address(MP); h.RootNode = p; % update treeview treeview(MP,'refresh',h.Hand.Figure.TreeView); h.SelectNode(p); else h.SelectNode(cnode); end else h.SelectNode(cnode); errordlg('Failed to close down current project', 'Error', 'modal'); end h.removeStatusMsg(msgID);