+
−function varargout = panXyettocome(varargin)
+
−
+
−% ========================================================================
+
−% ======================= Panel yet to come ==============================
+
−% ========================================================================
+
−% This is the GUI m-file to show that the relative panel (see ltpdagui.m)
+
−% is yet to be programmed.
+
−%
+
−%  $Id: panXyettocome.m,v 1.1 2008/03/01 13:43:20 nicola Exp $
+
−
+
−currPanel   = varargin{1};
+
−panelDimens = get(currPanel, 'Position');
+
−backColor   = get(currPanel, 'BackgroundColor');
+
−
+
−uicontrol(...
+
−    'Parent',currPanel,...
+
−    'BackgroundColor',backColor,...
+
−    'Units','pixels',...
+
−    'HorizontalAlignment','center',...
+
−    'Position',[50, (panelDimens(4)-30)/2, panelDimens(3)-100, 30],...
+
−    'Fontname','Times New Roman',...
+
−    'FontSize',13,...
+
−    'FontAngle','italic',...
+
−    'String','This panel is yet to come, but it''s not intended for release in v1.0',...
+
−    'TooltipString','You ain''t seen anything yet',...
+
−    'Visible','on',...
+
−    'Style','text');
+
−