centerFigure.m
7b5f655686a3TekRSA-Freq-vs-Time

centerFigure.m
View Options

			% Find figure within the object and move it to the center of the screen

			function centerFigure(Obj)

			% Find figure within the object if the object is not a figure itself
			Fig = findFigure(Obj);

			if isempty(Fig)
			return
			end

			R = groot();

			fig_units = Fig.Units;
			Fig.Units = R.Units;

			fig_w = Fig.Position(3);
			fig_h = Fig.Position(4);

			% Display the figure window in the center of the screen
			fig_x = R.ScreenSize(3)/2-fig_w/2;
			fig_y = R.ScreenSize(4)/2-fig_h/2;

			Fig.Position(1:2) = [fig_x, fig_y];

			% Restore the orignal value of figure units
			Fig.Units = fig_units;
			end