------------------------------------------------------------------------------
-- --
-- Copyright (C) 1998-2000 E. Briot, J. Brobecker and A. Charlet --
-- Copyright (C) 2000-2014, AdaCore --
-- --
-- This library is free software; you can redistribute it and/or modify it --
-- under terms of the GNU General Public License as published by the Free --
-- Software Foundation; either version 3, or (at your option) any later --
-- version. This library is distributed in the hope that it will be useful, --
-- but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHAN- --
-- TABILITY or FITNESS FOR A PARTICULAR PURPOSE. --
-- --
-- As a special exception under Section 7 of GPL version 3, you are granted --
-- additional permissions described in the GCC Runtime Library Exception, --
-- version 3.1, as published by the Free Software Foundation. --
-- --
-- You should have received a copy of the GNU General Public License and --
-- a copy of the GCC Runtime Library Exception along with this program; --
-- see the files COPYING3 and COPYING.RUNTIME respectively. If not, see --
-- <http://www.gnu.org/licenses/>. --
-- --
------------------------------------------------------------------------------
-- <description>
-- GtkCellRendererSpinner renders a spinning animation in a cell, very
-- similar to Gtk.Spinner.Gtk_Spinner. It can often be used as an alternative
-- to a Gtk.Cell_Renderer_Progress.Gtk_Cell_Renderer_Progress for displaying
-- indefinite activity, instead of actual progress.
--
-- To start the animation in a cell, set the
-- Gtk.Cell_Renderer_Spinner.Gtk_Cell_Renderer_Spinner:active property to True
-- and increment the Gtk.Cell_Renderer_Spinner.Gtk_Cell_Renderer_Spinner:pulse
-- property at regular intervals. The usual way to set the cell renderer
-- properties for each cell is to bind them to columns in your tree model
-- using e.g. gtk_tree_view_column_add_attribute.
--
-- </description>
pragma Ada_2005;
pragma Warnings (Off, "*is already use-visible*");
with Glib; use Glib;
with Glib.Properties; use Glib.Properties;
with Gtk.Cell_Renderer; use Gtk.Cell_Renderer;
with Gtk.Enums; use Gtk.Enums;
package Gtk.Cell_Renderer_Spinner is
type Gtk_Cell_Renderer_Spinner_Record is new Gtk_Cell_Renderer_Record with null record;
type Gtk_Cell_Renderer_Spinner is access all Gtk_Cell_Renderer_Spinner_Record'Class;
------------------
-- Constructors --
------------------
procedure Gtk_New (Self : out Gtk_Cell_Renderer_Spinner);
procedure Initialize
(Self : not null access Gtk_Cell_Renderer_Spinner_Record'Class);
-- Returns a new cell renderer which will show a spinner to indicate
-- activity.
-- Since: gtk+ 2.20
function Gtk_Cell_Renderer_Spinner_New return Gtk_Cell_Renderer_Spinner;
-- Returns a new cell renderer which will show a spinner to indicate
-- activity.
-- Since: gtk+ 2.20
function Get_Type return Glib.GType;
pragma Import (C, Get_Type, "gtk_cell_renderer_spinner_get_type");
----------------
-- Properties --
----------------
-- The following properties are defined for this widget. See
-- Glib.Properties for more information on properties)
Active_Property : constant Glib.Properties.Property_Boolean;
Pulse_Property : constant Glib.Properties.Property_Uint;
-- Pulse of the spinner. Increment this value to draw the next frame of
-- the spinner animation. Usually, you would update this value in a
-- timeout.
--
-- By default, the Gtk.Spinner.Gtk_Spinner widget draws one full cycle of
-- the animation, consisting of 12 frames, in 750 milliseconds.
Size_Property : constant Gtk.Enums.Property_Gtk_Icon_Size;
-- The Gtk.Enums.Gtk_Icon_Size value that specifies the size of the
-- rendered spinner.
private
Size_Property : constant Gtk.Enums.Property_Gtk_Icon_Size :=
Gtk.Enums.Build ("size");
Pulse_Property : constant Glib.Properties.Property_Uint :=
Glib.Properties.Build ("pulse");
Active_Property : constant Glib.Properties.Property_Boolean :=
Glib.Properties.Build ("active");
end Gtk.Cell_Renderer_Spinner;