comparison m-toolbox/m/gui/ltpdv/callbacks/ltpdv_build_buildobject.m @ 0:f0afece42f48

Import.
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Wed, 23 Nov 2011 19:22:13 +0100
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:f0afece42f48
1 % LTPDV_BUILD_BUILDOBJECT callback for the build object button on the build
2 % panel.
3 %
4 % M Hewitson 26-08-08
5 %
6 % $Id: ltpdv_build_buildobject.m,v 1.1 2008/09/02 07:51:47 hewitson Exp $
7 %
8
9 function ltpdv_build_buildobject(varargin)
10
11 % Handles
12 myh = varargin{1};
13 mainfig = varargin{end};
14 parampanh = findobj(mainfig, 'Tag', 'LTPDVbuildParamsPanel');
15
16 % Get class
17 cl = ltpdv_build_get_selected_class(mainfig);
18
19 % Get parameters
20 pl = ltpdv_get_params_from_panel(parampanh);
21
22 % Build this object
23 obj = feval(cl, pl);
24
25 % Import object
26 objs = getappdata(mainfig, 'LTPDAobjects');
27 setappdata(mainfig, 'LTPDAobjects', [objs {obj}]);
28 % Refresh object list
29 ltpdv_refresh_object_list(mainfig);
30
31
32 end