RemoveGraph_jd

 This function erase selected graphs from axes

0001 function [handles,SelectedGraphs] = RemoveGraph_jd(hObject, eventdata, handles, axes, listbox, visible, selectedgraphs)
0002 %
0003 % This function erase selected graphs from axes
0004 %
0005 ListOfRemovedGraphs = [];
0006 for iGraph = selectedgraphs,
0007     if isequal(handles.graphs{iGraph}.axes,axes),
0008         ListOfRemovedGraphs = [ListOfRemovedGraphs,iGraph];
0009     end
0010 end
0011 %
0012 handles.graphs(ListOfRemovedGraphs) = [];
0013 %
0014 UpdateListOfGraphs_jd(listbox, [], handles, axes);
0015 %
0016 UpdatePlotOfGraphs_jd(axes, [], handles);
0017 %
0018 set(listbox,'Value',1)
0019 %
0020 SelectedGraphs = 1;
0021 %
0022 UpdateVisible_jd(visible, [], handles, axes, SelectedGraphs);