Homec4science
Diffusion Instrument Control (TekRSA-Freq-vs-Time) Browse

rINSTCONTROL/Utility functions/App utilities/genericInitGui.asv
fa9366f41c8aTekRSA-Freq-vs-Time

Last Change
Raw File

genericInitGui.asv
View Options

% Start the Gui with specified instrument class
% Assign the instance name to the class variable and the instrument name to
% the window
function genericInitGui(app, default_instr_class, interface, address, varargin)
p=inputParser();
% Ignore unmatched parameters
p.KeepUnmatched = true;
addParameter(p,'instance_name','',@ischar);
addParameter(p,'instr_class','',@ischar);
parse(p,varargin{:});
% Assign the instance name (instance is gui+instrument)
if isprop(app, 'instance_name')
app.instance_name = p.Results.instance_name;
else
warning(['''instance_name'' property is absent in the ',...
'gui class, the instance global variable will not ',...
'be cleared on exit'])
end
% Connect to the instrument by using either instr_class or
% default_instr_class
if ~ismember(p.UsingDefaults, 'instr_class')
class = p.Results.instr_class;
elseif isequal(interface,'instr_list')
% load the InstrumentList structure
InstrumentList = getLocalInstrList();
% In this case 'address' is the instrument name in
% the list
instr_name = address;
if ~isfield(InstrumentList, instr_name)
error('%s is not a field of InstrumentList', instr_name)
end
class = InstrumentList.(instr_name).control_class;
else
% The default class is Gui-specific, so need to set it manually
class = default_instr_class;
end
else
class = default_instr_class;
end
app.Instr = feval(class, interface, address, varargin{:});
readPropertyHedged(app.Instr,'all');
% Display instrument's name if given
if ~isempty(app.Instr.name)
% Find the main figure
app_props = properties(app);
is_figure = false(1,length(app_props));
for i=1:length(app_props)
tmp_el = app.(app_props{i});
try
if isequal(tmp_el.Type, 'figure') && isprop(tmp_el, 'Name')
is_figure(i) = true;
end
catch
end
end
if any(is_figure)
prop = app_props(is_figure);
app.(prop{1}).Name = char(app.Instr.name);
else
warning('No UIFigure found to assign the name')
end
end
end
c4science · Help