> The procedure Stroke_Color seems to accept as argument only string color 
> desciptors and not RGBA.

Context_2D contains
   procedure Stroke_Color (Context : in out Context_2D_Type;
                           Value   : in     Gnoga.Types.RGBA_Type);
   procedure Stroke_Color (Context : in out Context_2D_Type;
                           Value   : in     String);
   procedure Stroke_Color
     (Context : in out Context_2D_Type;
      Value   : in     Gnoga.Types.Colors.Color_Enumeration);
   --  Color used for strokes

so you can use any of  RGBA, String, or the enumeration type. As an example, in 
Mine_Detector I have
   Black       : constant Gnoga.Types.RGBA_Type := Gnoga.Types.Colors.To_RGBA 
(Gnoga.Types.Colors.Black);

      Button_Context.Stroke_Color (Value => Black);

--
Jeff Carter
"Now go away or I shall taunt you a second time."
Monty Python and the Holy Gral

_______________________________________________
Gnoga-list mailing list
Gnoga-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gnoga-list

Reply via email to