#include <CtrlLib/CtrlLib.h>

using namespace Upp;

struct VertDisplay : Display {
    virtual void Paint(Draw& w, const Rect& r, const Value& q, Color ink, Color paper, dword style) const;
};

class VerticalLabel : public Label
{
	public:
	
		typedef VerticalLabel CLASSNAME;
		
		VerticalLabel();
		VerticalLabel& SetText(const char *text);
		
	private:
		PaintRect pr;
};

#include "VerticalLabel.h"

void VertDisplay::Paint(Draw& w, const Rect& r, const Value& q, Color ink, Color paper, dword style) const
{
    w.DrawRect(r, paper);
	w.DrawText(r.left,r.top,900,q.ToString(),StdFont(),(style & CURSOR)&&(style & FOCUS)?SLtRed:ink);
}

VerticalLabel::VerticalLabel()
{
	SetAlign(ALIGN_LEFT);
	SetVAlign(ALIGN_BOTTOM);
	pr.SetDisplay(Single<VertDisplay>());
}

VerticalLabel& VerticalLabel::SetText(const char *text)
{
	pr.SetValue(text);
	SetPaintRect(pr);
	return *this;
}