opengl.demos: Update code to use new openGL updates.

2025-09-15 11:07:24 +10:00
parent 52376f5b0a
commit 242b2d7828
25 changed files with 134 additions and 56 deletions
--- a/3-mid/opengl/applet/demo/renderer/render_screenshot/launch_render_screenshot.adb
+++ b/3-mid/opengl/applet/demo/renderer/render_screenshot/launch_render_screenshot.adb
@@ -45,6 +45,9 @@ begin
         the_Visuals (i) := new_Visual (the_Models (i));
      end loop;

+      the_Visuals (1).Scale_is ([0.2, 0.2, 1.0]);     -- Text visual.
+
+
      --  Main loop.
      --
      while not Demo.Done