Adds a property to ensure an id is rendered. Also adds the creation of TWebControlDecorator. It also accounts for the render blocker in TWebControl. Adds an alternate render path when decorators are present. Adds the TWebControlDecorator class. Now skins can define their own surrounding tag html and templates instead of having to code every page.

3 files changed, 843 insertions, 434 deletions

diff --git a/.gitattributes b/.gitattributes
index fe708dd6..9ec66334 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -2893,6 +2893,7 @@ framework/Web/UI/WebControls/TTextProcessor.php -text
 framework/Web/UI/WebControls/TValidationSummary.php -text
 framework/Web/UI/WebControls/TWebControl.php -text
 framework/Web/UI/WebControls/TWebControlAdapter.php -text
+framework/Web/UI/WebControls/TWebControlDecorator.php -text
 framework/Web/UI/WebControls/TWizard.php -text
 framework/Web/UI/WebControls/TWizardNavigationButtonStyle.php -text
 framework/Web/UI/WebControls/TXmlTransform.php -text
diff --git a/framework/Web/UI/WebControls/TWebControl.php b/framework/Web/UI/WebControls/TWebControl.php
index 2e1899ad..de9e4868 100644
--- a/framework/Web/UI/WebControls/TWebControl.php
+++ b/framework/Web/UI/WebControls/TWebControl.php
@@ -1,434 +1,503 @@
-<?php

-/**

- * TWebControl class file.

- *

- * @author Qiang Xue <qiang.xue@gmail.com>

- * @link http://www.pradosoft.com/

- * @copyright Copyright &copy; 2005-2008 PradoSoft
- * @license http://www.pradosoft.com/license/

- * @version $Id$

- * @package System.Web.UI.WebControls

- */

-

-/**

- * Includes TStyle and TWebAdapter definition

- */

-Prado::using('System.Web.UI.WebControls.TStyle');

-Prado::using('System.Web.UI.WebControls.TWebControlAdapter');

-

-/**

- * TWebControl class

- *

- * TWebControl is the base class for controls that share a common set

- * of UI-related properties and methods. TWebControl-derived controls

- * are usually associated with HTML tags. They thus have tag name, attributes

- * and body contents. You can override {@link getTagName} to specify the tag name,

- * {@link addAttributesToRender} to specify the attributes to be rendered,

- * and {@link renderContents} to customize the body content rendering.

- * TWebControl encapsulates a set of properties related with CSS style fields,

- * such as {@link getBackColor BackColor}, {@link getBorderWidth BorderWidth}, etc.

- *

- * Subclasses of TWebControl typically needs to override {@link addAttributesToRender}

- * and {@link renderContents}. The former is used to render the attributes

- * of the HTML tag associated with the control, while the latter is to render

- * the body contents enclosed within the HTML tag.

- *

- * @author Qiang Xue <qiang.xue@gmail.com>

- * @version $Id$

- * @package System.Web.UI.WebControls

- * @since 3.0

- */

-class TWebControl extends TControl implements IStyleable

-{

-	/**

-	 * Copies basic control attributes from another control.

-	 * Properties including AccessKey, ToolTip, TabIndex, Enabled

-	 * and Attributes are copied.

-	 * @param TWebControl source control

-	 */

-	public function copyBaseAttributes(TWebControl $control)

-	{

-		$this->setAccessKey($control->getAccessKey());

-		$this->setToolTip($control->getToolTip());

-		$this->setTabIndex($control->getTabIndex());

-		if(!$control->getEnabled())

-			$this->setEnabled(false);

-		if($control->getHasAttributes())

-			$this->getAttributes()->copyFrom($control->getAttributes());

-	}

-

-	/**

-	 * @return string the access key of the control

-	 */

-	public function getAccessKey()

-	{

-		return $this->getViewState('AccessKey','');

-	}

-

-	/**

-	 * Sets the access key of the control.

-	 * Only one-character string can be set, or an exception will be raised.

-	 * Pass in an empty string if you want to disable access key.

-	 * @param string the access key to be set

-	 * @throws TInvalidDataValueException if the access key is specified with more than one character

-	 */

-	public function setAccessKey($value)

-	{

-		if(strlen($value)>1)

-			throw new TInvalidDataValueException('webcontrol_accesskey_invalid',get_class($this),$value);

-		$this->setViewState('AccessKey',$value,'');

-	}

-

-	/**

-	 * @return string the background color of the control

-	 */

-	public function getBackColor()

-	{

-		if($style=$this->getViewState('Style',null))

-			return $style->getBackColor();

-		else

-			return '';

-	}

-

-	/**

-	 * @param string the background color of the control

-	 */

-	public function setBackColor($value)

-	{

-		$this->getStyle()->setBackColor($value);

-	}

-

-	/**

-	 * @return string the border color of the control

-	 */

-	public function getBorderColor()

-	{

-		if($style=$this->getViewState('Style',null))

-			return $style->getBorderColor();

-		else

-			return '';

-	}

-

-	/**

-	 * @param string the border color of the control

-	 */

-	public function setBorderColor($value)

-	{

-		$this->getStyle()->setBorderColor($value);

-	}

-

-	/**

-	 * @return string the border style of the control

-	 */

-	public function getBorderStyle()

-	{

-		if($style=$this->getViewState('Style',null))

-			return $style->getBorderStyle();

-		else

-			return '';

-	}

-

-	/**

-	 * @param string the border style of the control

-	 */

-	public function setBorderStyle($value)

-	{

-		$this->getStyle()->setBorderStyle($value);

-	}

-

-	/**

-	 * @return string the border width of the control

-	 */

-	public function getBorderWidth()

-	{

-		if($style=$this->getViewState('Style',null))

-			return $style->getBorderWidth();

-		else

-			return '';

-	}

-

-	/**

-	 * @param string the border width of the control

-	 */

-	public function setBorderWidth($value)

-	{

-		$this->getStyle()->setBorderWidth($value);

-	}

-

-	/**

-	 * @return TFont the font of the control

-	 */

-	public function getFont()

-	{

-		return $this->getStyle()->getFont();

-	}

-

-	/**

-	 * @return string the foreground color of the control

-	 */

-	public function getForeColor()

-	{

-		if($style=$this->getViewState('Style',null))

-			return $style->getForeColor();

-		else

-			return '';

-	}

-

-	/**

-	 * @param string the foreground color of the control

-	 */

-	public function setForeColor($value)

-	{

-		$this->getStyle()->setForeColor($value);

-	}

-

-	/**

-	 * @return string the height of the control

-	 */

-	public function getHeight()

-	{

-		if($style=$this->getViewState('Style',null))

-			return $style->getHeight();

-		else

-			return '';

-	}

-

-	/**

-	 * @param TDisplayStyle display style of the control, default is TDisplayStyle::Fixed

-	 */

-	public function setDisplay($value)

-	{

-		$this->getStyle()->setDisplayStyle($value);

-	}

-

-	/**

-	 * @return TDisplayStyle display style of the control, default is TDisplayStyle::Fixed

-	 */

-	public function getDisplay()

-	{

-		return $this->getStyle()->getDisplayStyle();

-	}

-

-	/**

-	 * @param string the css class of the control

-	 */

-	public function setCssClass($value)

-	{

-		$this->getStyle()->setCssClass($value);

-	}

-

-	/**

-	 * @return string the css class of the control

-	 */

-	public function getCssClass()

-	{

-		if($style=$this->getViewState('Style',null))

-			return $style->getCssClass();

-		else

-			return '';

-	}

-

-	/**

-	 * @param string the height of the control

-	 */

-	public function setHeight($value)

-	{

-		$this->getStyle()->setHeight($value);

-	}

-

-	/**

-	 * @return boolean whether the control has defined any style information

-	 */

-	public function getHasStyle()

-	{

-		return $this->getViewState('Style',null)!==null;

-	}

-

-	/**

-	 * Creates a style object to be used by the control.

-	 * This method may be overriden by controls to provide customized style.

-	 * @return TStyle the default style created for TWebControl

-	 */

-	protected function createStyle()

-	{

-		return new TStyle;

-	}

-

-	/**

-	 * @return TStyle the object representing the css style of the control

-	 */

-	public function getStyle()

-	{

-		if($style=$this->getViewState('Style',null))

-			return $style;

-		else

-		{

-			$style=$this->createStyle();

-			$this->setViewState('Style',$style,null);

-			return $style;

-		}

-	}

-

-	/**

-	 * Sets the css style string of the control.

-	 * The style string will be prefixed to the styles set via other control properties (e.g. Height, Width).

-	 * @param string the css style string

-	 * @throws TInvalidDataValueException if the parameter is not a string

-	 */

-	public function setStyle($value)

-	{

-		if(is_string($value))

-			$this->getStyle()->setCustomStyle($value);

-		else

-			throw new TInvalidDataValueException('webcontrol_style_invalid',get_class($this));

-	}

-

-	/**

-	 * Removes all style data.

-	 */

-	public function clearStyle()

-	{

-		$this->clearViewState('Style');

-	}

-

-	/**

-	 * @return integer the tab index of the control

-	 */

-	public function getTabIndex()

-	{

-		return $this->getViewState('TabIndex',0);

-	}

-

-	/**

-	 * Sets the tab index of the control.

-	 * Pass 0 if you want to disable tab index.

-	 * @param integer the tab index to be set

-	 */

-	public function setTabIndex($value)

-	{

-		$this->setViewState('TabIndex',TPropertyValue::ensureInteger($value),0);

-	}

-

-	/**

-	 * Returns the tag name used for this control.

-	 * By default, the tag name is 'span'.

-	 * You can override this method to provide customized tag names.

-	 * @return string tag name of the control to be rendered

-	 */

-	protected function getTagName()

-	{

-		return 'span';

-	}

-

-	/**

-	 * @return string the tooltip of the control

-	 */

-	public function getToolTip()

-	{

-		return $this->getViewState('ToolTip','');

-	}

-

-	/**

-	 * Sets the tooltip of the control.

-	 * Pass an empty string if you want to disable tooltip.

-	 * @param string the tooltip to be set

-	 */

-	public function setToolTip($value)

-	{

-		$this->setViewState('ToolTip',$value,'');

-	}

-

-	/**

-	 * @return string the width of the control

-	 */

-	public function getWidth()

-	{

-		if($style=$this->getViewState('Style',null))

-			return $style->getWidth();

-		else

-			return '';

-	}

-

-	/**

-	 * @param string the width of the control

-	 */

-	public function setWidth($value)

-	{

-		$this->getStyle()->setWidth($value);

-	}

-

-	/**

-	 * Adds attribute name-value pairs to renderer.

-	 * By default, the method will render 'id', 'accesskey', 'disabled',

-	 * 'tabindex', 'title' and all custom attributes.

-	 * The method can be overriden to provide customized attribute rendering.

-	 * @param THtmlWriter the writer used for the rendering purpose

-	 */

-	protected function addAttributesToRender($writer)

-	{

-		if($this->getID()!=='')

-			$writer->addAttribute('id',$this->getClientID());

-		if(($accessKey=$this->getAccessKey())!=='')

-			$writer->addAttribute('accesskey',$accessKey);

-		if(!$this->getEnabled())

-			$writer->addAttribute('disabled','disabled');

-		if(($tabIndex=$this->getTabIndex())>0)

-			$writer->addAttribute('tabindex',"$tabIndex");

-		if(($toolTip=$this->getToolTip())!=='')

-			$writer->addAttribute('title',$toolTip);

-		if($style=$this->getViewState('Style',null))

-			$style->addAttributesToRender($writer);

-		if($this->getHasAttributes())

-		{

-			foreach($this->getAttributes() as $name=>$value)

-				$writer->addAttribute($name,$value);

-		}

-	}

-

-	/**

-	 * Renders the control.

-	 * This method overrides the parent implementation by replacing it with

-	 * the following sequence:

-	 * - {@link renderBeginTag}

-	 * - {@link renderContents}

-	 * - {@link renderEndTag}

-	 * @param THtmlWriter the writer used for the rendering purpose

-	 */

-	public function render($writer)

-	{

-		$this->renderBeginTag($writer);

-		$this->renderContents($writer);

-		$this->renderEndTag($writer);

-	}

-

-	/**

-	 * Renders the openning tag for the control (including attributes)

-	 * @param THtmlWriter the writer used for the rendering purpose

-	 */

-	public function renderBeginTag($writer)

-	{

-		$this->addAttributesToRender($writer);

-		$writer->renderBeginTag($this->getTagName());

-	}

-

-	/**

-	 * Renders the body content enclosed between the control tag.

-	 * By default, child controls and text strings will be rendered.

-	 * You can override this method to provide customized content rendering.

-	 * @param THtmlWriter the writer used for the rendering purpose

-	 */

-	public function renderContents($writer)

-	{

-		parent::renderChildren($writer);

-	}

-

-	/**

-	 * Renders the closing tag for the control

-	 * @param THtmlWriter the writer used for the rendering purpose

-	 */

-	public function renderEndTag($writer)

-	{

-		$writer->renderEndTag();

-	}

-}

-

+<?php
+/**
+ * TWebControl class file.
+ *
+ * @author Qiang Xue <qiang.xue@gmail.com>
+ * @link http://www.pradosoft.com/
+ * @copyright Copyright &copy; 2005-2010 PradoSoft
+ * @license http://www.pradosoft.com/license/
+ * @version $Id$
+ * @package System.Web.UI.WebControls
+ */
+
+/**
+ * Includes TStyle and TWebAdapter definition
+ */
+Prado::using('System.Web.UI.WebControls.TStyle');
+Prado::using('System.Web.UI.WebControls.TWebControlAdapter');
+Prado::using('System.Web.UI.WebControls.TWebControlDecorator');
+
+/**
+ * TWebControl class
+ *
+ * TWebControl is the base class for controls that share a common set
+ * of UI-related properties and methods. TWebControl-derived controls
+ * are usually associated with HTML tags. They thus have tag name, attributes
+ * and body contents. You can override {@link getTagName} to specify the tag name,
+ * {@link addAttributesToRender} to specify the attributes to be rendered,
+ * and {@link renderContents} to customize the body content rendering.
+ * TWebControl encapsulates a set of properties related with CSS style fields,
+ * such as {@link getBackColor BackColor}, {@link getBorderWidth BorderWidth}, etc.
+ *
+ * Subclasses of TWebControl typically needs to override {@link addAttributesToRender}
+ * and {@link renderContents}. The former is used to render the attributes
+ * of the HTML tag associated with the control, while the latter is to render
+ * the body contents enclosed within the HTML tag.
+ *
+ * @author Qiang Xue <qiang.xue@gmail.com>
+ * @version $Id$
+ * @package System.Web.UI.WebControls
+ * @since 3.0
+ */
+class TWebControl extends TControl implements IStyleable
+{
+	/**
+	 *	@var boolean ensures the inclusion the id in the tag rendering.
+	 */
+	private $_ensureid=false;
+	
+	/**
+	 *	@var TWebControlDecorator this render things before and after both the open and close tag
+	 */
+	protected $_decorator;
+	
+
+	/**
+	 * Subclasses can override getEnsureId or just set this property.  eg. If your subclass
+	 * control does work with javascript and your class wants to flag that it requires an id
+	 * to operate properly.  Once set to true, it stays that way.
+	 * @param boolean pass true to enable enforcement of the tag attribute id.
+	 */
+	public function setEnsureId($value)
+	{
+		$this->_ensureid |= TPropertyValue::ensureBoolean($value);
+	}
+
+	/**
+	 * @return whether this web control must have an id
+	 */
+	public function getEnsureId()
+	{
+		return $this->_ensureid;
+	}
+
+	/**
+	 * @return TWebControlDecorator
+	 */
+	public function getDecorator($create=true)
+	{
+		if($create && !$this->_decorator)
+			$this->_decorator = Prado::createComponent('TWebControlDecorator', $this);
+		return $this->_decorator;
+	}
+	
+	/**
+	 * Copies basic control attributes from another control.
+	 * Properties including AccessKey, ToolTip, TabIndex, Enabled
+	 * and Attributes are copied.
+	 * @param TWebControl source control
+	 */
+	public function copyBaseAttributes(TWebControl $control)
+	{
+		$this->setAccessKey($control->getAccessKey());
+		$this->setToolTip($control->getToolTip());
+		$this->setTabIndex($control->getTabIndex());
+		if(!$control->getEnabled())
+			$this->setEnabled(false);
+		if($control->getHasAttributes())
+			$this->getAttributes()->copyFrom($control->getAttributes());
+	}
+
+	/**
+	 * @return string the access key of the control
+	 */
+	public function getAccessKey()
+	{
+		return $this->getViewState('AccessKey','');
+	}
+
+	/**
+	 * Sets the access key of the control.
+	 * Only one-character string can be set, or an exception will be raised.
+	 * Pass in an empty string if you want to disable access key.
+	 * @param string the access key to be set
+	 * @throws TInvalidDataValueException if the access key is specified with more than one character
+	 */
+	public function setAccessKey($value)
+	{
+		if(strlen($value)>1)
+			throw new TInvalidDataValueException('webcontrol_accesskey_invalid',get_class($this),$value);
+		$this->setViewState('AccessKey',$value,'');
+	}
+
+	/**
+	 * @return string the background color of the control
+	 */
+	public function getBackColor()
+	{
+		if($style=$this->getViewState('Style',null))
+			return $style->getBackColor();
+		else
+			return '';
+	}
+
+	/**
+	 * @param string the background color of the control
+	 */
+	public function setBackColor($value)
+	{
+		$this->getStyle()->setBackColor($value);
+	}
+
+	/**
+	 * @return string the border color of the control
+	 */
+	public function getBorderColor()
+	{
+		if($style=$this->getViewState('Style',null))
+			return $style->getBorderColor();
+		else
+			return '';
+	}
+
+	/**
+	 * @param string the border color of the control
+	 */
+	public function setBorderColor($value)
+	{
+		$this->getStyle()->setBorderColor($value);
+	}
+
+	/**
+	 * @return string the border style of the control
+	 */
+	public function getBorderStyle()
+	{
+		if($style=$this->getViewState('Style',null))
+			return $style->getBorderStyle();
+		else
+			return '';
+	}
+
+	/**
+	 * @param string the border style of the control
+	 */
+	public function setBorderStyle($value)
+	{
+		$this->getStyle()->setBorderStyle($value);
+	}
+
+	/**
+	 * @return string the border width of the control
+	 */
+	public function getBorderWidth()
+	{
+		if($style=$this->getViewState('Style',null))
+			return $style->getBorderWidth();
+		else
+			return '';
+	}
+
+	/**
+	 * @param string the border width of the control
+	 */
+	public function setBorderWidth($value)
+	{
+		$this->getStyle()->setBorderWidth($value);
+	}
+
+	/**
+	 * @return TFont the font of the control
+	 */
+	public function getFont()
+	{
+		return $this->getStyle()->getFont();
+	}
+
+	/**
+	 * @return string the foreground color of the control
+	 */
+	public function getForeColor()
+	{
+		if($style=$this->getViewState('Style',null))
+			return $style->getForeColor();
+		else
+			return '';
+	}
+
+	/**
+	 * @param string the foreground color of the control
+	 */
+	public function setForeColor($value)
+	{
+		$this->getStyle()->setForeColor($value);
+	}
+
+	/**
+	 * @return string the height of the control
+	 */
+	public function getHeight()
+	{
+		if($style=$this->getViewState('Style',null))
+			return $style->getHeight();
+		else
+			return '';
+	}
+
+	/**
+	 * @param TDisplayStyle display style of the control, default is TDisplayStyle::Fixed
+	 */
+	public function setDisplay($value)
+	{
+		$this->getStyle()->setDisplayStyle($value);
+	}
+
+	/**
+	 * @return TDisplayStyle display style of the control, default is TDisplayStyle::Fixed
+	 */
+	public function getDisplay()
+	{
+		return $this->getStyle()->getDisplayStyle();
+	}
+
+	/**
+	 * @param string the css class of the control
+	 */
+	public function setCssClass($value)
+	{
+		$this->getStyle()->setCssClass($value);
+	}
+
+	/**
+	 * @return string the css class of the control
+	 */
+	public function getCssClass()
+	{
+		if($style=$this->getViewState('Style',null))
+			return $style->getCssClass();
+		else
+			return '';
+	}
+
+	/**
+	 * @param string the height of the control
+	 */
+	public function setHeight($value)
+	{
+		$this->getStyle()->setHeight($value);
+	}
+
+	/**
+	 * @return boolean whether the control has defined any style information
+	 */
+	public function getHasStyle()
+	{
+		return $this->getViewState('Style',null)!==null;
+	}
+
+	/**
+	 * Creates a style object to be used by the control.
+	 * This method may be overriden by controls to provide customized style.
+	 * @return TStyle the default style created for TWebControl
+	 */
+	protected function createStyle()
+	{
+		return new TStyle;
+	}
+
+	/**
+	 * @return TStyle the object representing the css style of the control
+	 */
+	public function getStyle()
+	{
+		if($style=$this->getViewState('Style',null))
+			return $style;
+		else
+		{
+			$style=$this->createStyle();
+			$this->setViewState('Style',$style,null);
+			return $style;
+		}
+	}
+
+	/**
+	 * Sets the css style string of the control.
+	 * The style string will be prefixed to the styles set via other control properties (e.g. Height, Width).
+	 * @param string the css style string
+	 * @throws TInvalidDataValueException if the parameter is not a string
+	 */
+	public function setStyle($value)
+	{
+		if(is_string($value))
+			$this->getStyle()->setCustomStyle($value);
+		else
+			throw new TInvalidDataValueException('webcontrol_style_invalid',get_class($this));
+	}
+
+	/**
+	 * Removes all style data.
+	 */
+	public function clearStyle()
+	{
+		$this->clearViewState('Style');
+	}
+
+	/**
+	 * @return integer the tab index of the control
+	 */
+	public function getTabIndex()
+	{
+		return $this->getViewState('TabIndex',0);
+	}
+
+	/**
+	 * Sets the tab index of the control.
+	 * Pass 0 if you want to disable tab index.
+	 * @param integer the tab index to be set
+	 */
+	public function setTabIndex($value)
+	{
+		$this->setViewState('TabIndex',TPropertyValue::ensureInteger($value),0);
+	}
+
+	/**
+	 * Returns the tag name used for this control.
+	 * By default, the tag name is 'span'.
+	 * You can override this method to provide customized tag names.
+	 * @return string tag name of the control to be rendered
+	 */
+	protected function getTagName()
+	{
+		return 'span';
+	}
+
+	/**
+	 * @return string the tooltip of the control
+	 */
+	public function getToolTip()
+	{
+		return $this->getViewState('ToolTip','');
+	}
+
+	/**
+	 * Sets the tooltip of the control.
+	 * Pass an empty string if you want to disable tooltip.
+	 * @param string the tooltip to be set
+	 */
+	public function setToolTip($value)
+	{
+		$this->setViewState('ToolTip',$value,'');
+	}
+
+	/**
+	 * @return string the width of the control
+	 */
+	public function getWidth()
+	{
+		if($style=$this->getViewState('Style',null))
+			return $style->getWidth();
+		else
+			return '';
+	}
+
+	/**
+	 * @param string the width of the control
+	 */
+	public function setWidth($value)
+	{
+		$this->getStyle()->setWidth($value);
+	}
+	
+
+	/**
+	 * @difficulty if your subclass overrides the onPreRender method be sure to call 
+	 * this method through parent::onPreRender($param); so your sub-class can be decorated,
+	 * among other things.
+	 * @param TEventParameter event parameter to be passed to the event handlers
+	 */
+	public function onPreRender($param) {
+		if($decorator = $this->getDecorator(false))
+			$decorator->instantiate();
+		
+		parent::onPreRender($param);
+	}
+
+	/**
+	 * Adds attribute name-value pairs to renderer.
+	 * By default, the method will render 'id', 'accesskey', 'disabled',
+	 * 'tabindex', 'title' and all custom attributes.
+	 * The method can be overriden to provide customized attribute rendering.
+	 * @param THtmlWriter the writer used for the rendering purpose
+	 */
+	protected function addAttributesToRender($writer)
+	{
+		if($this->getID()!=='' || $this->getEnsureId())
+			$writer->addAttribute('id',$this->getClientID());
+		if(($accessKey=$this->getAccessKey())!=='')
+			$writer->addAttribute('accesskey',$accessKey);
+		if(!$this->getEnabled())
+			$writer->addAttribute('disabled','disabled');
+		if(($tabIndex=$this->getTabIndex())>0)
+			$writer->addAttribute('tabindex',"$tabIndex");
+		if(($toolTip=$this->getToolTip())!=='')
+			$writer->addAttribute('title',$toolTip);
+		if($style=$this->getViewState('Style',null))
+			$style->addAttributesToRender($writer);
+		if($this->getHasAttributes())
+		{
+			foreach($this->getAttributes() as $name=>$value)
+				$writer->addAttribute($name,$value);
+		}
+	}
+
+	/**
+	 * Renders the control.
+	 * This method overrides the parent implementation by replacing it with
+	 * the following sequence:
+	 * - {@link renderBeginTag}
+	 * - {@link renderContents}
+	 * - {@link renderEndTag}
+	 * @param THtmlWriter the writer used for the rendering purpose
+	 */
+	public function render($writer)
+	{
+		if($this->getIsRenderBlocked())
+			return;
+		
+		$this->renderBeginTag($writer);
+		$this->renderContents($writer);
+		$this->renderEndTag($writer);
+	}
+
+	/**
+	 * Renders the openning tag for the control (including attributes)
+	 * @param THtmlWriter the writer used for the rendering purpose
+	 */
+	public function renderBeginTag($writer)
+	{
+		if($decorator = $this->getDecorator(false)) {
+			$decorator->renderPreTagText($writer);
+			$this->addAttributesToRender($writer);
+			$writer->renderBeginTag($this->getTagName());
+			$decorator->renderPreContentsText($writer);
+		} else {
+			$this->addAttributesToRender($writer);
+			$writer->renderBeginTag($this->getTagName());
+		}
+	}
+
+	/**
+	 * Renders the body content enclosed between the control tag.
+	 * By default, child controls and text strings will be rendered.
+	 * You can override this method to provide customized content rendering.
+	 * @param THtmlWriter the writer used for the rendering purpose
+	 */
+	public function renderContents($writer)
+	{
+		parent::renderChildren($writer);
+	}
+
+	/**
+	 * Renders the closing tag for the control
+	 * @param THtmlWriter the writer used for the rendering purpose
+	 */
+	public function renderEndTag($writer)
+	{
+		if($decorator = $this->getDecorator(false)) {
+			$decorator->renderPostContentsText($writer);
+			$writer->renderEndTag();
+			$decorator->renderPostTagText($writer);
+		} else 
+			$writer->renderEndTag($writer);
+	}
+}
diff --git a/framework/Web/UI/WebControls/TWebControlDecorator.php b/framework/Web/UI/WebControls/TWebControlDecorator.php
new file mode 100644
index 00000000..07102d31
--- /dev/null
+++ b/framework/Web/UI/WebControls/TWebControlDecorator.php
@@ -0,0 +1,339 @@
+<?
+/**
+ * TWebControlDecorator class file.
+ *
+ * @author Brad Anderson <javalizard@gmail.com>
+ * @link http://www.pradosoft.com/
+ * @copyright Copyright &copy; 2005-2010 PradoSoft
+ * @license http://www.pradosoft.com/license/
+ * @version $Id: TWebControlDecorator.php 2541 2008-10-21 15:05:13Z qiang.xue $
+ * @package System.Web.UI.WebControls
+ */
+
+
+/**
+ * TWebControlDecorator class
+ * 
+ * This places theme related html and templates before and after both the open and close 
+ * tag of a {@link TWebControl}.
+ * 
+ * This is an easy way to have your look and feel depend upon the theme instead of writing 
+ * specific html in your templates to achieve your website desires.  This makes updating the
+ * look and feel of your website much more simple.  Here is an example of how to code your theme
+ * skin:
+ * <code>
+ * <com:THeader2 TagName="h3">
+ *	<prop:Decorator.PreTagText>
+ * 			<!-- In case the them you are importing needs this for it's h3 to look right -->
+ *		<div class="imported-theme-h3-container">
+ *	</prop:Decorator.PreTagText>
+ *	<prop:Decorator.PostTagText>
+ * 			<!-- To close things properly -->
+ *		</div>
+ *	</prop:Decorator.PostTagText>
+ * </com:THeader2>
+ * </code>
+ *
+ * The order of the inclusion of the decoration into the page goes like this:
+ * * PreTagTemplate
+ * * PreTagText
+ * * TWebControl Open Tag Rendered
+ * * PreContentsText
+ * * PreContentsTemplate
+ * * TWebControl Children Rendered
+ * * PostContentsTemplate
+ * * PostContentsText
+ * * TWebControl CloseTag Rendered
+ * * PostTagText
+ * * PostTagTemplate
+ * 
+ * To move controls around please see the {@link TMigrate} control.  You may use {@link TMigrate} 
+ * in your Decorator templates to move controls in your MasterTemplate around using your theme 
+ * elements around on your page.
+ *
+ * @author Brad Anderson <javalizard@gmail.com>
+ * @version $Id: TWebControlDecorator.php 2541 2008-10-21 15:05:13Z qiang.xue $
+ * @package System.Web.UI.WebControls
+ * @since 3.2
+ */
+
+class TWebControlDecorator extends TComponent {
+	
+	/**
+	 * @var boolean tells if there should only be decoration around the inner content
+	 */
+	private $_internalonly;
+	
+	/**
+	 * @var TWebControl the control to decorate
+	 */
+	private $_control;
+	
+	/**
+	 * @var boolean This tells if the Templates have been 
+	 */
+	private $_addedTemplateDecoration=false;
+	
+	
+	/**
+	 * @var string the text that goes before the open tag
+	 */
+	private $_pretagtext = '';
+	/**
+	 * @var string the text that goes after the open tag
+	 */
+	private $_precontentstext = '';
+	/**
+	 * @var string the text that goes before the close tag
+	 */
+	private $_postcontentstext = '';
+	/**
+	 * @var string the text that goes after the close tag
+	 */
+	private $_posttagtext = '';
+	
+	
+	
+	/**
+	 * @var TTemplate the template that goes before the open tag
+	 */
+	private $_pretagtemplate;
+	/**
+	 * @var TTemplate the template that goes after the open tag
+	 */
+	private $_precontentstemplate;
+	/**
+	 * @var TTemplate the template that goes before the close tag
+	 */
+	private $_postcontentstemplate;
+	/**
+	 * @var TTemplate the template that goes after the close tag
+	 */
+	private $_posttagtemplate;
+	
+	/**
+	 * Constructor.
+	 * Initializes the control .
+	 * @param TWebControl The control that is to be decorated.
+	 * @param boolean whether decoration is just around the inner content
+	 */
+	public function __construct($control, $onlyinternal = false) {
+		parent::__construct();
+		
+		$this->_control = $control;
+		$this->_internalonly = $onlyinternal;
+	}
+	
+	/**
+	 * @return string gets the text before the open tag in the TWebControl
+	 */
+	public function getPreTagText() {
+		return $this->_pretagtext;
+	}
+	
+	/**
+	 * @param string sets the text before the open tag in the TWebControl
+	 */
+	public function setPreTagText($value) {
+		if(!$this->_internalonly && !$this->_control->getIsSkinApplied())
+			$this->_pretagtext = TPropertyValue::ensureString($value);
+	}
+	
+	
+	/**
+	 * @return string the text after the open tag in the TWebControl
+	 */
+	public function getPreContentsText() {
+		return $this->_precontentstext;
+	}
+	
+	/**
+	 * @param string sets the text after the open tag in the TWebControl
+	 */
+	public function setPreContentsText($value) {
+		if(!$this->_control->getIsSkinApplied())
+			$this->_precontentstext = TPropertyValue::ensureString($value);
+	}
+	
+	
+	/**
+	 * @return string the text before the close tag in the TWebControl
+	 */
+	public function getPostContentsText() {
+		return $this->_postcontentstext;
+	}
+	
+	/**
+	 * @param string sets the text before the close tag in the TWebControl
+	 */
+	public function setPostContentsText($value) {
+		if(!$this->_control->getIsSkinApplied())
+			$this->_postcontentstext = TPropertyValue::ensureString($value);
+	}
+	
+	
+	/**
+	 * @return string the text before the close tag in the TWebControl
+	 */
+	public function getPostTagText() {
+		return $this->_posttagtext;
+	}
+	
+	/**
+	 * @param string sets the text after the close tag in the TWebControl
+	 */
+	public function setPostTagText($value) {
+		if(!$this->_internalonly && !$this->_control->getIsSkinApplied())
+			$this->_posttagtext = TPropertyValue::ensureString($value);
+	}
+	
+	
+	/**
+	 * @return TTemplate|null the template before the open tag in the TWebControl.  Defaults to null.
+	 */
+	public function getPreTagTemplate() {
+		return $this->_pretagtemplate;
+	}
+	
+	/**
+	 * @param TTemplate sets the template before the open tag in the TWebControl
+	 */
+	public function setPreTagTemplate($value) {
+		if(!$this->_internalonly && !$this->_control->getIsSkinApplied())
+			$this->_pretagtemplate = $value;
+	}
+	
+	
+	/**
+	 * @return TTemplate|null the template after the open tag in the TWebControl.  Defaults to null.
+	 */
+	public function getPreContentsTemplate() {
+		return $this->_precontentstemplate;
+	}
+	
+	/**
+	 * @param TTemplate sets the template after the open tag in the TWebControl
+	 */
+	public function setPreContentsTemplate($value) {
+		if(!$this->_control->getIsSkinApplied())
+			$this->_precontentstemplate = $value;
+	}
+	
+	
+	/**
+	 * @return TTemplate|null the template before the close tag in the TWebControl.  Defaults to null.
+	 */
+	public function getPostContentsTemplate() {
+		return $this->_postcontentstemplate;
+	}
+	
+	/**
+	 * @param TTemplate sets the template before the close tag in the TWebControl
+	 */
+	public function setPostContentsTemplate($value) {
+		if(!$this->_control->getIsSkinApplied())
+			$this->_postcontentstemplate = $value;
+	}
+	
+	
+	/**
+	 * @return TTemplate|null the template after the close tag in the TWebControl.  Defaults to null.
+	 */
+	public function getPostTagTemplate() {
+		return $this->_posttagtemplate;
+	}
+	
+	/**
+	 * @param TTemplate sets the template before the close tag in the TWebControl
+	 */
+	public function setPostTagTemplate($value) {
+		if(!$this->_internalonly && !$this->_control->getIsSkinApplied())
+			$this->_posttagtemplate = $value;
+	}
+	
+	/**
+	 *	this is a framework call.  The Text decoration can't 
+	 * influence the object hierarchy because they are rendered into into the writer directly.
+	 * This call attaches the ensureTemplateDecoration to the TPage onSaveStateComplete so 
+	 * these controls don't have page states.  This is as close to not influencing the page as possible.
+	 */
+	public function instantiate() {
+		
+		$this->_addedTemplateDecoration = false;
+		
+		if($this->getPreTagTemplate() || $this->getPreContentsTemplate() || 
+			$this->getPostContentsTemplate() || $this->getPostTagTemplate())
+			$control->Page->onSaveStateComplete[] = array($this, 'ensureTemplateDecoration');
+		// OnPreRenderComplete onSaveStateComplete
+	}
+	
+	
+	/**
+	 *	This method places the templates around the open and close tag
+	 * @return boolean returns true if the template decorations have been added
+	 */
+	public function ensureTemplateDecoration() {
+		$control = $this->_control;
+		if($this->_addedTemplateDecoration || !$control->Parent) return $this->_addedTemplateDecoration;
+		
+		$this->_addedTemplateDecoration = true;
+		
+		if($this->getPreTagTemplate()) {
+			$pretag = Prado::createComponent('TCompositeControl');
+			$this->getPreTagTemplate()->instantiateIn($pretag);
+			$control->getParent()->getControls()->insertBefore($control, $pretag);
+		}
+		
+		if($this->getPreContentsTemplate()) {
+			$precontents = Prado::createComponent('TCompositeControl');
+			$this->getPreContentsTemplate()->instantiateIn($precontents);
+			$control->getControls()->insertAt(0, $precontents);
+		}
+		
+		if($this->getPostContentsTemplate()) {
+			$postcontents = Prado::createComponent('TCompositeControl');
+			$this->getPostContentsTemplate()->instantiateIn($postcontents);
+			$control->getControls()->add($postcontents);
+		}
+		
+		if($this->getPostTagTemplate()) {
+			$posttag = Prado::createComponent('TCompositeControl');
+			$this->getPostTagTemplate()->instantiateIn($posttag);
+			$control->getParent()->getControls()->insertAfter($control, $posttag);
+		}
+		return true;
+	}
+	
+	
+	/**
+	 * This method places the pre tag text into the {@link TTextWriter}
+	 * @param {@link TTextWriter} the writer to which the text is written
+	 */
+	public function renderPreTagText($writer) {
+		$writer->write($this->getPreTagText());
+	}
+	
+	/**
+	 * This method places the pre contents text into the {@link TTextWriter}
+	 * @param {@link TTextWriter} the writer to which the text is written
+	 */
+	public function renderPreContentsText($writer) {
+		$writer->write($this->getPreContentsText());
+	}
+	
+	/**
+	 * This method places the post contents text into the {@link TTextWriter}
+	 * @param {@link TTextWriter} the writer to which the text is written
+	 */
+	public function renderPostContentsText($writer) {
+		$writer->write($this->getPostContentsText());
+	}
+	
+	/**
+	 * This method places the post tag text into the {@link TTextWriter}
+	 * @param {@link TTextWriter} the writer to which the text is written
+	 */
+	public function renderPostTagText($writer) {
+		$writer->write($this->getPostTagText());
+	}
+}