MyGuiCont.m
5ceeca9fc596TekRSA-Freq-vs-Time

MyGuiCont.m
View Options

			% Class that provides basic functionality for handling App-based GUIs

			classdef MyGuiCont < handle

			properties (Access = public)

			% GUI object that is stored for reference only. Should include the
			% main figure.
			Gui

			% Name of the GUI class that can be used with the instrument
			gui_name char
			end

			methods (Access = public)
			function this = MyGuiCont()

			% Create default name of the GUI based on the class name
			class_name = class(this);

			% Optionally remove 'My' in front of the class name
			tok = regexp(class_name, '(My)?(.+)','tokens');

			try
			if ~isempty(tok)
			this.gui_name = ['Gui' tok{1}{2}];
			end
			catch ME
			warning(['Could not create default GUI name for ' ...
			'the class ' class_name '. Error:' ME.message]);
			end
			end

			function createGui(this)
			assert(~isempty(this.gui_name), ['GUI name is not ' ...
			'specified for the instrument class ' class(this)]);

			if isempty(this.Gui) \|\| ~isvalid(this.Gui)
			this.Gui = feval(this.gui_name, this);
			end
			end

			function closeGui(this)
			if isempty(this.Gui) \|\| ~isvalid(this.Gui)

			% Do nothing as there is no GUI already
			return
			end

			try

			% Remove the object from the cleanup list list so it is not
			% deleted with GUI
			removeFromCleanup(this.Gui.GuiSync, this)
			catch
			end

			% Delete the app by closing its figure
			closeApp(this.Gui);
			this.Gui = [];
			end
			end

			methods
			function set.Gui(this, Val)
			assert(isempty(Val) \|\| (~isempty(findFigure(Val))), ...
			['Value assigned to Gui property must include a figure '...
			'or be empty.']);

			this.Gui = Val;
			end
			end
			end