Subversion Repositories OpenFresco

Rev

Rev 269 | Rev 289 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 269 Rev 286
Line 311... Line 311...
311 
        if ~isempty(findobj('Tag','AnalysisControls'))
311 
        if ~isempty(findobj('Tag','AnalysisControls'))
312 
            close(findobj('Tag','AnalysisControls'))
312 
            close(findobj('Tag','AnalysisControls'))
313 
        end    
313 
        end    
314 
       
314 
       
315 
        %Check for .tcl and report files and delete if found
315 
        %Check for .tcl and report files and delete if found
316 
        if exist('OPFAnalysis.tcl','file') == 2
- 
 
317 
            delete('OPFAnalysis.tcl');
- 
 
- 
 
 316 
        if exist('OPFAnalysis.tcl','file')
- 
 
 317 
            delete(which('OPFAnalysis.tcl'));
318 
        end
318 
        end
319 
        if exist('OPFReport.txt','file') == 2
- 
 
320 
            delete('OPFReport.txt');
- 
 
- 
 
 319 
        if exist('OPFReport.txt','file')
- 
 
 320 
            delete(which('OPFReport.txt'));
321 
        end
321 
        end
322 

            322
            

          

          

            323
            
        %Select structure tab


            323
            
        %Select structure tab


          

          

            324
            
        tabs = get(handles.Sidebar(1),'Children');


            324
            
        tabs = get(handles.Sidebar(1),'Children');


          

          

            325
            
        set(handles.Sidebar(1),'SelectedObject',tabs(5));


            325
            
        set(handles.Sidebar(1),'SelectedObject',tabs(5));