package Gtkada.Style is
subtype Cairo_Color_Val is Glib.Gdouble range 0.0 .. 1.0;
type Cairo_Color is record R, G, B : Cairo_Color_Val; Alpha : Cairo_Color_Val := 1.0; end record;
type HSV_Color is record H, S, V, A : Cairo_Color_Val; end record;
function To_HSV
| ( | Color | : Cairo_Color) return HSV_Color; |
function To_Cairo
| ( | HSV | : HSV_Color) return Cairo_Color; |
function To_Cairo
| ( | Color | : Gdk.Color.Gdk_Color) return Cairo_Color; |
function Shade
| ( | Color | : Gdk.Color.Gdk_Color; |
| Value | : Glib.Gdouble) return Cairo_Color; |
function Shade
| ( | Color | : Cairo_Color; |
| Value | : Glib.Gdouble) return Cairo_Color; |
procedure Set_Source_Color
| ( | Cr | : Cairo.Cairo_Context; |
| Color | : Cairo_Color); |
procedure Rounded_Rectangle
| ( | Cr | : Cairo.Cairo_Context; |
| X, Y, W, H | : Glib.Gdouble; | |
| Radius | : Glib.Gdouble); |
procedure Draw_Shadow
| ( | Cr | : Cairo.Cairo_Context; |
| Style | : Gtk.Style.Gtk_Style; | |
| Shadow_Type | : Gtk.Enums.Gtk_Shadow_Type; | |
| X, Y, Width, Height | : Glib.Gint; | |
| Corner_Radius | : Glib.Gdouble := 0.0); |
procedure Draw_Rectangle
| ( | Cr | : Cairo.Cairo_Context; |
| Color | : Cairo_Color; | |
| Filled | : Boolean; | |
| X, Y, Width, Height | : Glib.Gint; | |
| Corner_Radius | : Glib.Gdouble := 0.0); |
procedure Draw_Rectangle
| ( | Cr | : Cairo.Cairo_Context; |
| Color | : Gdk.Color.Gdk_Color; | |
| Filled | : Boolean; | |
| X, Y, Width, Height | : Glib.Gint; | |
| Corner_Radius | : Glib.Gdouble := 0.0); |
procedure Draw_Line
| ( | Cr | : Cairo.Cairo_Context; |
| Color | : Cairo_Color; | |
| X1, Y1, X2, Y2 | : Glib.Gint); |
procedure Draw_Line
| ( | Cr | : Cairo.Cairo_Context; |
| Color | : Gdk.Color.Gdk_Color; | |
| X1, Y1, X2, Y2 | : Glib.Gint); |
procedure Draw_Layout
| ( | Cr | : Cairo.Cairo_Context; |
| Color | : Cairo_Color; | |
| X, Y | : Glib.Gint; | |
| Layout | : Pango.Layout.Pango_Layout); |
procedure Draw_Layout
| ( | Cr | : Cairo.Cairo_Context; |
| Color | : Gdk.Color.Gdk_Color; | |
| X, Y | : Glib.Gint; | |
| Layout | : Pango.Layout.Pango_Layout); |
procedure Draw_Pixbuf
| ( | Cr | : Cairo.Cairo_Context; |
| Pixbuf | : Gdk.Pixbuf.Gdk_Pixbuf; | |
| X, Y | : Glib.Gint); |