#include <CtrlLib/CtrlLib.h>

using namespace Upp;

struct App : TopWindow {
    ScrollBar   sb;
    Array<RichTextCtrl> items;
    
    int GetLineHeight() {
        return 25;
    }

    void Sync() {
        int startY = 10;
        Rect pr = GetRect();
        auto sz = GetSize();
        
        for(RichTextCtrl& item : items) {
            Rect r = item.GetRect();

            item.SetRect(r.left, startY - sb, pr.GetWidth(), item.GetHeight(sz.cx));
            startY += r.GetHeight() + 5;
        }
        
        sb.SetTotal(startY);
    }

    void Paint(Draw& w) override {
        Size sz = GetSize();
        w.DrawRect(sz, SWhite());
        Sync();
    }

    void Layout() override {
        sb.SetPage(GetSize().cy);
    }

    void MouseWheel(Point, int zdelta, dword) override {
        sb.Wheel(zdelta);
    }

    bool Key(dword key, int) override {
        return sb.VertKey(key);
    }

    App() {
        Sizeable().Zoomable();
        
        for(int i = 0; i < 1000; i++) {
            RichTextCtrl& item = items.Create<RichTextCtrl>();
            
            item.SetData(
                Format(
                "[@(%d.%d.%d) Lorem ipsum dolor sit amet, consectetur adipiscing elit, sed do eiusmod tempor incididunt ut labore et "
                "dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip "
                "ex ea commodo consequat. Duis aute irure dolor in reprehenderit in voluptate velit esse cillum dolore eu "
                "fugiat nulla pariatur. Excepteur sint occaecat cupidatat non proident, sunt in culpa qui officia deserunt "
                "mollit anim id est laborum.]",
                (int)Random(255), (int)Random(255), (int)Random(255))
                );
            
            item.SetZoom(Zoom(1, 1));
            item.HSizePos(0, 0).VSizePos(0, 0);
            item.SetRect(0, 0, 0, item.GetHeight(250));
            item.IgnoreMouse();
            
            Add(item);
        }
        
        Sync();
        
        sb.Enable();
        sb.WhenScroll = [this] { Sync(); };
        sb.SetLine(GetLineHeight());
        AddFrame(sb);
    }
};

GUI_APP_MAIN {
    App app;
    app.SetRect(0, 0, 250, 500);
    app.Run();
}

#include <CtrlLib/CtrlLib.h>

using namespace Upp;

struct App : TopWindow {
	ScrollBar   sb;
	Array<RichTextCtrl> items;
	
	int GetLineHeight() {
		return 25;
	}

	void Scroll() {
		Size sz = GetSize();
		int sy = sb;
		int y = 0;
		for(RichTextCtrl& item : items) {
			int h = item.GetRect().GetHeight();
			if(sz.cx && y + h > sy && y < sy + sz.cy) {
				item.Show();
				item.SetRect(0, y - sy, sz.cx, h);
			}
			else
				item.Hide();
			y += h + 5;
		}
	}

	void Paint(Draw& w) override {
		Size sz = GetSize();
		w.DrawRect(sz, SWhite());
	}

	void Layout() override {
		Size sz = GetSize();
		sb.SetPage(sz.cy);

		if(sz.cx) {
			int y = 0;
			for(RichTextCtrl& item : items) { // compute the height - that can be slow
				Rect r = item.GetRect();
				if(r.GetWidth() != sz.cx) {
					int h = item.GetHeight(sz.cx);
					item.SetRect(0, 0, sz.cx, h);
					item.Hide();
					y += h + 5;
				}
			}
			sb.SetTotal(y);
		}
		
		Scroll();
	}

	void MouseWheel(Point, int zdelta, dword) override {
		sb.Wheel(zdelta);
	}

	bool Key(dword key, int) override {
		return sb.VertKey(key);
	}

	App() {
		Sizeable().Zoomable();
		
		for(int i = 0; i < 10000; i++) {
			RichTextCtrl& item = items.Create<RichTextCtrl>();
			
			item.SetData(
				Format(
				"[@(%d.%d.%d) Lorem ipsum dolor sit amet, consectetur adipiscing elit, sed do eiusmod tempor incididunt ut labore et "
				"dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip "
				"ex ea commodo consequat. Duis aute irure dolor in reprehenderit in voluptate velit esse cillum dolore eu "
				"fugiat nulla pariatur. Excepteur sint occaecat cupidatat non proident, sunt in culpa qui officia deserunt "
				"mollit anim id est laborum.]",
				(int)Random(255), (int)Random(255), (int)Random(255))
				);
			
			item.SetZoom(Zoom(1, 1));
			item.SetRect(0, 0, 0, 0);
			item.IgnoreMouse();
			
			Add(item);
		}
		
		sb.Enable();
		sb.WhenScroll = [this] { Scroll(); };
		sb.SetLine(GetLineHeight());
		AddFrame(sb);
	}
};

GUI_APP_MAIN {
	App app;
	app.SetRect(0, 0, 250, 500);
	app.Run();
}