var nav4 = window.Event ? true : false;

    FocusButton=null;
	SelButton=null;
	HiButton=null;
	
	// If you want to monitor the changing of focus from one control to
	// another, create a function with the following (In your module)
	// function FocusChangeEvent(PrevFocus,NewFocus);
	FocusChangeEvent=0;
	
	// Local Event Wrapper
    function ctrl_Hi_Event(e)
	{
		if (nav4) {
			if (e)
				if (e.target.ctrl)
					e.target.ctrl.Hi();
		}
		else
		{
			if (event)
				if (event.srcElement.ctrl)
			  event.srcElement.ctrl.Hi();
		}
	}

	function ctrl_UnHi_Event(e)
	{
		if (nav4) {
			if (e)
				if (e.target.ctrl)
					e.target.ctrl.UnHi();
		}
		else
		{
			if (event)
				if (event.srcElement.ctrl)
					event.srcElement.ctrl.UnHi();
		}
	}
	
	function ctrl_Sel_Event(e)
	{
		if (nav4) {
			if (e)
				if (e.target.ctrl)
					e.target.ctrl.Sel();
		}
		else
		{
			if (event)
				if (event.srcElement.ctrl)
					event.srcElement.ctrl.Sel();
		}
	}

	function ctrl_GotBlur_Event(e)
	{
		if (nav4) {
			if (e)
				if (e.target.ctrl)
					e.target.ctrl.GotBlur();
		}
		else
		{
			if (event)
				if (event.srcElement.ctrl)
					event.srcElement.ctrl.GotBlur();
		}
	}

	function ctrl_GotFocus_Event(e)
	{
		if (nav4) {
			if (e)
				if (e.target.ctrl)
					e.target.ctrl.GotFocus();
		}
		else
		{
			if (event)
				if (event.srcElement.ctrl)
					event.srcElement.ctrl.GotFocus();
		}
	}

	// Object Methods
	function ctrl_Hi()
	{
		if (HiButton && HiButton!=this)
			HiButton.UnHi();
		HiButton=this;
		this.ctrl.style.color=this.BackgroundColor;
		this.ctrl.style.borderColor=this.HighLightColor;
		this.ctrl.style.backgroundColor=this.HighLightColor;
		if (this.OnHi!=0)
			this.OnHi();
	}

	function ctrl_UnHi()
	{
		HiButton=null;
		this.ctrl.style.color=this.ControlColor;
		this.ctrl.style.borderColor=this.ControlColor;
		this.ctrl.style.backgroundColor=this.BackgroundColor;
		if (this.OnUnHi!=0)
			this.OnUnHi();
	}

	function ctrl_NoSel()
	{
		if (FocusChangeEvent!=0)
		  FocusChangeEvent(FocusButton,this.ctrl);
		if (this.OnSel!=0)
			this.OnSel();
		FocusButton=this.ctrl;
	}

	function rollT2(SrcText,HighLightColor,BackgroundColor,ControlColor)
	{
		this.HighLightColor = HighLightColor;
		this.BackgroundColor = BackgroundColor;
		this.ControlColor = ControlColor;
		// Set Control
		this.ctrl=SrcText;
		// Set up Methods
		this.Hi = ctrl_Hi;
		this.UnHi = ctrl_UnHi;
		this.Sel = ctrl_NoSel;
		// Set up User Events
		this.OnHi = 0;
		this.OnUnHi = 0;
		this.OnSel = 0;
		// Set Control Element Up...
		SrcText.ctrl=this;
		// Set up styles...
		SrcText.style.backgroundColor = this.BackgroundColor;
		SrcText.style.borderWidth = 2;
		SrcText.style.borderColor = this.ControlColor;
		SrcText.style.borderStyle = 'solid';
		SrcText.style.color = this.ControlColor;
		// Set Events...
		SrcText.onmousedown=ctrl_Sel_Event;
		SrcText.onmouseout=ctrl_UnHi_Event
		SrcText.onmouseover=ctrl_Hi_Event;
	}