source: trunk/src/close_fig.m @ 810

Last change on this file since 810 was 809, checked in by g7moreau, 10 years ago
  • Add license
File size: 1.3 KB
Line 
1%'close_fig': function  activated when a figure is closed
2%----------------------------------------------------------------
3% function close_fig(ggg,eventdata,hparent,type)
4% activated by the command:
5%set(hObject,'DeleteFcn',{@close_fig,hparent,type})
6% where hObject is the handle of the figure
7%
8
9%=======================================================================
10% Copyright 2008-2014, LEGI UMR 5519 / CNRS UJF G-INP, Grenoble, France
11%   http://www.legi.grenoble-inp.fr
12%   Joel.Sommeria - Joel.Sommeria (A) legi.cnrs.fr
13%
14%     This file is part of the toolbox UVMAT.
15%
16%     UVMAT is free software; you can redistribute it and/or modify
17%     it under the terms of the GNU General Public License as published
18%     by the Free Software Foundation; either version 2 of the license,
19%     or (at your option) any later version.
20%
21%     UVMAT is distributed in the hope that it will be useful,
22%     but WITHOUT ANY WARRANTY; without even the implied warranty of
23%     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
24%     GNU General Public License (see LICENSE.txt) for more details.
25%=======================================================================
26
27function close_fig(ggg,eventdata,hparent,type)
28if isequal(type,'zoom')
29    delete(hparent)  % delete the rectangle showing the zoom graph in the parent fig
30end
Note: See TracBrowser for help on using the repository browser.