comparison 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';