IRootLab
An Open-Source MATLAB toolbox for vibrational biospectroscopy
uip_vis_sovalues_drawimage.m
Go to the documentation of this file.
1 %> @ingroup guigroup
2 %> @file
3 %> @brief Properties Window for @ref vis_sovalues_drawimage
5 
6 %>@cond
7 function varargout = uip_vis_sovalues_drawimage(varargin)
8 % Last Modified by GUIDE v2.5 12-Nov-2012 16:59:19
9 
10 % Begin initialization code - DO NOT EDIT
11 gui_Singleton = 1;
12 gui_State = struct('gui_Name', mfilename, ...
13  'gui_Singleton', gui_Singleton, ...
14  'gui_OpeningFcn', @uip_vis_sovalues_drawimage_OpeningFcn, ...
15  'gui_OutputFcn', @uip_vis_sovalues_drawimage_OutputFcn, ...
16  'gui_LayoutFcn', [] , ...
17  'gui_Callback', []);
18 if nargin && ischar(varargin{1})
19  gui_State.gui_Callback = str2func(varargin{1});
20 end
21 
22 if nargout
23  [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:});
24 else
25  gui_mainfcn(gui_State, varargin{:});
26 end
27 % End initialization code - DO NOT EDIT
28 
29 
30 % --- Executes just before uip_vis_sovalues_drawimage is made visible.
31 function uip_vis_sovalues_drawimage_OpeningFcn(hObject, eventdata, handles, varargin) %#ok<*INUSL>
32 if nargin > 4
33  handles.input.sovalues = varargin{2};
34 else
35  handles.input.sovalues = [];
36 end;
37 handles.output.flag_ok = 0;
38 guidata(hObject, handles);
39 gui_set_position(hObject);
40 
41 if ~isempty(handles.input.sovalues)
42  sov = handles.input.sovalues;
43  a = sov.get_numericfieldnames();
44  set(handles.popupmenu_valuesfieldname, 'string', a);
45  set(handles.edit_valuesfieldname, 'string', a{1});
46 else
47  set(handles.popupmenu_valuesfieldname, 'string', {'?'});
48 end;
49 
50 
51 % --- Outputs from this function are returned to the command clae.
52 function varargout = uip_vis_sovalues_drawimage_OutputFcn(hObject, eventdata, handles)
53 try
54  uiwait(handles.figure1);
55  handles = guidata(hObject);
56  varargout{1} = handles.output;
57  delete(gcf);
58 catch %#ok<*CTCH>
59  output.flag_ok = 0;
60  output.params = {};
61  varargout{1} = output;
62 end;
63 
64 
65 % --- Executes on button press in pushbuttonOk.
66 function pushbuttonOk_Callback(hObject, eventdata, handles)
67 try
68  aaa = eval(get(handles.edit_dimspec, 'String'));
69  if iscell(aaa)
70  aaa = cell2str(aaa);
71  else
72  aaa = mat2str(aaa);
73  end;
74 
75  svfn = fel(get(handles.edit_valuesfieldname, 'String'));
76  if ~isempty(handles.input.sovalues)
77  sov = handles.input.sovalues;
78  if ~any(strcmp(svfn, sov.get_numericfieldnames()));
79  irerror(sprintf('Invalid values field name: "%s"', svfn));
80  end;
81  end;
82 
83  handles.output.params = {...
84  'dimspec', aaa, ...
85  'valuesfieldname', ['''', svfn, ''''], ...
86  'clim', mat2str(eval(get(handles.edit_clim, 'String'))), ...
87  'flag_logtake' , int2str(get(handles.checkbox_flag_logtake, 'Value')) ...
88  };
89  handles.output.flag_ok = 1;
90  guidata(hObject, handles);
91  uiresume();
92 catch ME
93  irerrordlg(ME.message, 'Cannot continue');
94 
95 end;
96 
97 
98 function edit_dimspec_Callback(hObject, eventdata, handles) %#ok<*INUSD,*DEFNU>
99 
100 % --- Executes during object creation, after setting all properties.
101 function edit_dimspec_CreateFcn(hObject, eventdata, handles)
102 if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
103  set(hObject,'BackgroundColor','white');
104 end
105 
106 
107 
108 function edit_valuesfieldname_Callback(hObject, eventdata, handles)
109 
110 function edit_valuesfieldname_CreateFcn(hObject, eventdata, handles)
111 if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
112  set(hObject,'BackgroundColor','white');
113 end
114 
115 function edit_clim_Callback(hObject, eventdata, handles)
116 
117 function edit_clim_CreateFcn(hObject, eventdata, handles)
118 
119 if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
120  set(hObject,'BackgroundColor','white');
121 end
122 
123 function checkbox_flag_logtake_Callback(hObject, eventdata, handles)
124 
125 
126 %#####
127 function popupmenu_valuesfieldname_Callback(hObject, eventdata, handles)
128 contents = cellstr(get(hObject,'String'));
129 s = contents{get(hObject,'Value')};
130 if ~strcmp(s, '?')
131  set(handles.edit_valuesfieldname, 'String', s);
132 end;
133 
134 function popupmenu_valuesfieldname_CreateFcn(hObject, eventdata, handles)
135 if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
136  set(hObject,'BackgroundColor','white');
137 end
138 
139 
140 
141 %> @endcond
function cell2str(in c)
function irerror(in s)
Draws image from a sovalues object.
function fel(in c, in n)
function gui_set_position(in hObject)
function irerrordlg(in errorstring, in dlgname)