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/two_cameras/launch_two_cameras_demo.adb
+++ b/3-mid/opengl/applet/demo/two_cameras/launch_two_cameras_demo.adb
@@ -1,3 +1,4 @@
+with openGL.texture_Set;
 with
     openGL.Camera,
     openGL.Palette,
@@ -54,7 +55,8 @@ begin
                        right => (colors => [others => (Red,      Opaque)],  texture_name => the_Face)]);

      the_ball_Model : constant Model.Sphere.lit_colored_textured.view
-        := Model.Sphere.lit_colored_textured.new_Sphere (radius => 0.5);
+        := Model.Sphere.lit_colored_textured.new_Sphere (radius => 0.5,
+                                                         texture_Details => texture_Set.to_Details ([1 => the_Face]));

      --  The Sprites.
      --