view aim-mat/tools/@parameter/setradiobutton.m @ 0:74dedb26614d

Initial checkin of AIM-MAT version 1.5 (6.4.2011).

% method of class @parameter
% 
% (c) 2003-2008, University of Cambridge
% Maintained by Tom Walters ([e-mail]), written by Stefan Bleeck ([e-mail])
% http://www.pdn.cam.ac.uk/cnbh/aim2006/tools/parameter
% $Date: 2008-06-10 18:00:16 +0100 (Tue, 10 Jun 2008) $
function param=setradiobutton(param,text,inbox)


cont=param.entries;
nrent=length(cont);


for i=1:nrent
    type=cont{i}.type;
    if strcmp(type,'radiobutton') && strcmp(cont{i}.panel,inbox)
        if strcmp(cont{i}.text,text)
            cont{i}.value=1;
            param.entries=cont;
            return
        end
    end
end

% if still here, then it could have been an 'other' enty:
for i=1:nrent
    type=cont{i}.type;
    if strcmp(type,'radiobutton') && strcmp(cont{i}.panel,inbox) && strcmp(cont{i}.text,'other...')
        cont{i}.userdata=text;
        cont{i}.value=1;
        param.entries=cont;
        return
    end
end

val='error, the entry does not exist';