...

1 files changed, 85 insertions, 0 deletions

diff --git a/demos/scroll_view/main.cpp b/demos/scroll_view/main.cpp
new file mode 100644
index 00000000..f6b29934
--- /dev/null
+++ b/demos/scroll_view/main.cpp
@@ -0,0 +1,85 @@
+#include "cru/platform/gui/UiApplication.hpp"
+#include "cru/ui/controls/ScrollView.hpp"
+#include "cru/ui/controls/TextBlock.hpp"
+#include "cru/ui/controls/Window.hpp"
+
+using cru::ui::controls::ScrollView;
+using cru::ui::controls::TextBlock;
+using cru::ui::controls::Window;
+
+int main() {
+  auto application = cru::platform::gui::CreateUiApplication();
+
+  auto window = Window::Create();
+
+  auto scroll_view = ScrollView::Create();
+
+  window->AddChild(scroll_view, 0);
+
+  auto text_block = TextBlock::Create(
+      uR"([Verse 1]
+The snow glows white on the mountain tonight
+Not a footprint to be seen
+A kingdom of isolation
+And it looks like I'm the queen
+The wind is howling like this swirling storm inside
+Couldn't keep it in, Heaven knows I tried
+
+[Pre-Chorus]
+Don't let them in, don't let them see
+Be the good girl you always have to be
+Conceal, don't feel, don't let them know
+Well, now they know
+
+[Chorus]
+Let it go, let it go
+Can't hold it back anymore
+Let it go, let it go
+Turn away and slam the door
+I don't care what they're going to say
+Let the storm rage on
+The cold never bothered me anyway
+
+[Verse 2]
+It's funny how some distance
+Makes everything seem small
+And the fears that once controlled me
+Can't get to me at all
+
+[Pre-Chorus]
+It's time to see what I can do
+To test the limits and break through
+No right, no wrong, no rules for me
+I'm free
+
+[Chorus]
+Let it go, let it go
+I'm one with the wind and sky
+Let it go, let it go
+You'll never see me cry
+Here I stand, and here I'll stay
+Let the storm rage on...
+
+[Bridge]
+My power flurries through the air into the ground
+My soul is spiraling in frozen fractals all around
+And one thought crystallizes like an icy blast:
+I'm never going back, the past is in the past!
+
+[Chorus]
+Let it go, let it go
+And I'll rise like the break of dawn
+Let it go, let it go
+That perfect girl is gone
+Here I stand in the light of day
+Let the storm rage on!
+The cold never bothered me anyway)");
+
+  text_block->SetSelectable(true);
+
+  scroll_view->SetChild(text_block);
+
+  window->Show();
+
+  return application->Run();
+}