Home > m > gui > ltpdv > callbacks > ltpdv_get_params_from_panel.m

ltpdv_get_params_from_panel

PURPOSE ^

LTPDV_GET_PARAMS_FROM_PANEL get a plist from the parameters on a

SYNOPSIS ^

function pl = ltpdv_get_params_from_panel(parampanh)

DESCRIPTION ^

 LTPDV_GET_PARAMS_FROM_PANEL get a plist from the parameters on a
 parameters panel
 
 M Hewitson 26-08-08
 
 $Id: ltpdv_get_params_from_panel.m,v 1.1 2008/09/02 07:51:47 hewitson Exp $

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 % LTPDV_GET_PARAMS_FROM_PANEL get a plist from the parameters on a
0002 % parameters panel
0003 %
0004 % M Hewitson 26-08-08
0005 %
0006 % $Id: ltpdv_get_params_from_panel.m,v 1.1 2008/09/02 07:51:47 hewitson Exp $
0007 %
0008 function pl = ltpdv_get_params_from_panel(parampanh)
0009   
0010   
0011   % Get params
0012   pancomps  = getappdata(parampanh, 'pancomps');
0013 
0014   % loop over params
0015   pl = plist();
0016   for j=1:size(pancomps,1)
0017 
0018     % handles
0019     keyf = pancomps{j,1};
0020     valf = pancomps{j,2};
0021     actf = pancomps{j,3};
0022 
0023     % Get activate status
0024     if get(actf, 'Value')
0025       % Get key name
0026       key = get(keyf, 'String');
0027 
0028       % Get param value
0029       valclass = getappdata(valf, 'valClass');
0030 
0031       switch valclass
0032         case 'char'
0033           val = get(valf, 'String');
0034         case 'double'
0035           val = get(valf, 'String');
0036           try
0037             val = eval(val);
0038           end
0039         case 'sym'
0040           val = get(valf, 'String');
0041           val = sym(val);
0042         case 'specwin'
0043           strs = get(valf, 'String');
0044           idx  = get(valf, 'Value');
0045           val  = strs{idx};
0046           if strcmp(val, 'Kaiser')
0047             val = specwin(val, 10, 150);
0048           else
0049             val = specwin(val, 10);
0050           end
0051         case 'time'
0052           val = get(valf, 'String');
0053           val = time(val);
0054         otherwise
0055           error(['### Unsupported value class: ' valclass]);
0056       end
0057 
0058       % Add to plist
0059       pl = append(pl, key, val);
0060     end
0061   end
0062   
0063 end

Generated on Mon 08-Sep-2008 13:18:47 by m2html © 2003