package Row_List is new Glib.Glist.Generic_List (Gtk_Clist_Row);
type Gtk_Clist_Record is new Gtk.Container.Gtk_Container_Record with private;
type Gtk_Clist is access all Gtk_Clist_Record'Class;
type Gtk_Clist_Row is new Gdk.C_Proxy;
type Gtk_Button_Action is new Guint;
type Gtk_Cell_Type is (Cell_Empty, Cell_Text, Cell_Pixmap, Cell_Pixtext, Cell_Widget);
type Gtk_Clist_Compare_Func is access function (Clist : access Gtk_Clist_Record'Class; Row1 : Gtk_Clist_Row; Row2 : Gtk_Clist_Row) return Gint;
Button_Ignored : constant Gtk_Button_Action := 0;
Button_Selects : constant Gtk_Button_Action := 1 ** 0;
Button_Drags : constant Gtk_Button_Action := 1 ** 1;
Button_Expands : constant Gtk_Button_Action := 1 ** 2;
Signal_Abort_Column_Resize : constant Glib.Signal_Name := "abort_column_resize";
Signal_Click_Column : constant Glib.Signal_Name := "click_column";
Signal_End_Selection : constant Glib.Signal_Name := "end_selection";
Signal_Extend_Selection : constant Glib.Signal_Name := "extend_selection";
Signal_Resize_Column : constant Glib.Signal_Name := "resize_column";
Signal_Row_Move : constant Glib.Signal_Name := "row_move";
Signal_Scroll_Horizontal : constant Glib.Signal_Name := "scroll_horizontal";
Signal_Scroll_Vertical : constant Glib.Signal_Name := "scroll_vertical";
Signal_Select_All : constant Glib.Signal_Name := "select_all";
Signal_Select_Row : constant Glib.Signal_Name := "select_row";
Signal_Set_Scroll_Adjustments : constant Glib.Signal_Name := "set_scroll_adjustments";
Signal_Start_Selection : constant Glib.Signal_Name := "start_selection";
Signal_Toggle_Add_Mode : constant Glib.Signal_Name := "toggle_add_mode";
Signal_Toggle_Focus_Row : constant Glib.Signal_Name := "toggle_focus_row";
Signal_Undo_Selection : constant Glib.Signal_Name := "undo_selection";
Signal_Unselect_All : constant Glib.Signal_Name := "unselect_all";
Signal_Unselect_Row : constant Glib.Signal_Name := "unselect_row";
function Convert is new Unchecked_Conversion
( | System.Address, Gtk_Clist_Row); |
procedure Initialize
( | Widget | : access Gtk_Clist_Record'Class; |
Columns | : in Gint); |
procedure Gtk_New
( | Widget | : out Gtk_Clist; |
Columns | : in Gint; | |
Titles | : in Gtkada.Types.Chars_Ptr_Array); |
procedure Initialize
( | Widget | : access Gtk_Clist_Record'Class; |
Columns | : in Gint; | |
Titles | : in Gtkada.Types.Chars_Ptr_Array); |
function Get_Type return Gtk.Gtk_Type;
procedure Set_Hadjustment
( | Clist | : access Gtk_Clist_Record; |
Adjustment | : Gtk.Adjustment.Gtk_Adjustment); |
procedure Set_Vadjustment
( | Clist | : access Gtk_Clist_Record; |
Adjustment | : Gtk.Adjustment.Gtk_Adjustment); |
function Get_Hadjustment
( | Clist | : access Gtk_Clist_Record) return Gtk.Adjustment.Gtk_Adjustment; |
function Get_Vadjustment
( | Clist | : access Gtk_Clist_Record) return Gtk.Adjustment.Gtk_Adjustment; |
procedure Set_Selection_Mode
( | Clist | : access Gtk_Clist_Record; |
Mode | : in Gtk.Enums.Gtk_Selection_Mode); |
function Get_Selection_Mode
( | Clist | : access Gtk_Clist_Record) return Gtk.Enums.Gtk_Selection_Mode; |
function Get_Clist_Window
( | Clist | : access Gtk_Clist_Record) return Gdk.Window.Gdk_Window; |
procedure Freeze
( | Clist | : access Gtk_Clist_Record); |
procedure Thaw
( | Clist | : access Gtk_Clist_Record); |
procedure Set_Shadow_Type
( | Clist | : access Gtk_Clist_Record; |
The_Type | : in Gtk.Enums.Gtk_Shadow_Type); |
function Append
( | Clist | : access Gtk_Clist_Record; |
Text | : in Gtkada.Types.Chars_Ptr_Array) return Gint; |
function Prepend
( | Clist | : access Gtk_Clist_Record; |
Text | : in Gtkada.Types.Chars_Ptr_Array) return Gint; |
procedure Insert
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Text | : in Gtkada.Types.Chars_Ptr_Array); |
procedure Remove
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint); |
procedure Clear
( | Clist | : access Gtk_Clist_Record); |
procedure Swap_Rows
( | Clist | : access Gtk_Clist_Record; |
Row1 | : in Gint; | |
Row2 | : in Gint); |
procedure Row_Move
( | Clist | : access Gtk_Clist_Record; |
Source_Row | : in Gint; | |
Dest_Row | : in Gint); |
procedure Set_Sort_Column
( | Clist | : access Gtk_Clist_Record; |
Column | : Gint); |
function Get_Sort_Column
( | Clist | : access Gtk_Clist_Record) return Gint; |
procedure Set_Sort_Type
( | Clist | : access Gtk_Clist_Record; |
Sort_Type | : Gtk_Sort_Type); |
function Get_Sort_Type
( | Clist | : access Gtk_Clist_Record) return Gtk_Sort_Type; |
procedure Sort
( | Clist | : access Gtk_Clist_Record); |
procedure Set_Auto_Sort
( | Clist | : access Gtk_Clist_Record; |
Auto_Sort | : Boolean); |
procedure Set_Compare_Func
( | Clist | : access Gtk_Clist_Record; |
Func | : Gtk_Clist_Compare_Func); |
function Get_Columns
( | Clist | : access Gtk_Clist_Record) return Gint; |
procedure Column_Titles_Hide
( | Clist | : access Gtk_Clist_Record); |
procedure Column_Titles_Show
( | Clist | : access Gtk_Clist_Record); |
procedure Column_Title_Active
( | Clist | : access Gtk_Clist_Record; |
Column | : in Gint); |
procedure Column_Title_Passive
( | Clist | : access Gtk_Clist_Record; |
Column | : in Gint); |
procedure Column_Titles_Active
( | Clist | : access Gtk_Clist_Record); |
procedure Column_Titles_Passive
( | Clist | : access Gtk_Clist_Record); |
procedure Set_Column_Title
( | Clist | : access Gtk_Clist_Record; |
Column | : in Gint; | |
Title | : in UTF8_String); |
function Get_Column_Title
( | Clist | : access Gtk_Clist_Record; |
Column | : in Gint) return UTF8_String; |
procedure Set_Column_Widget
( | Clist | : access Gtk_Clist_Record; |
Column | : in Gint; | |
Widget | : access Gtk.Widget.Gtk_Widget_Record'Class); |
function Get_Column_Widget
( | Clist | : access Gtk_Clist_Record; |
Column | : in Gint) return Gtk.Widget.Gtk_Widget; |
procedure Set_Column_Justification
( | Clist | : access Gtk_Clist_Record; |
Column | : in Gint; | |
Justification | : in Gtk.Enums.Gtk_Justification); |
procedure Set_Column_Visibility
( | Clist | : access Gtk_Clist_Record; |
Column | : in Gint; | |
Visible | : in Boolean); |
procedure Set_Column_Resizeable
( | Clist | : access Gtk_Clist_Record; |
Column | : in Gint; | |
Resizeable | : in Boolean); |
procedure Set_Column_Auto_Resize
( | Clist | : access Gtk_Clist_Record; |
Column | : in Gint; | |
Auto_Resize | : in Boolean); |
function Columns_Autosize
( | Clist | : access Gtk_Clist_Record) return Gint; |
function Optimal_Column_Width
( | Clist | : access Gtk_Clist_Record; |
Column | : Gint) return Gint; |
procedure Set_Column_Width
( | Clist | : access Gtk_Clist_Record; |
Column | : in Gint; | |
Width | : in Gint); |
procedure Set_Column_Min_Width
( | Clist | : access Gtk_Clist_Record; |
Column | : Gint; | |
Min_Width | : Gint); |
procedure Set_Column_Max_Width
( | Clist | : access Gtk_Clist_Record; |
Column | : Gint; | |
Max_Width | : Gint); |
function Get_Rows
( | Clist | : access Gtk_Clist_Record) return Gint; |
procedure Set_Row_Height
( | Clist | : access Gtk_Clist_Record; |
Height | : Gint); |
function Row_Is_Visible
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint) return Gtk.Enums.Gtk_Visibility; |
procedure Set_Foreground
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Color | : in Gdk.Color.Gdk_Color); |
procedure Set_Background
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Color | : in Gdk.Color.Gdk_Color); |
procedure Set_Row_Style
( | Clist | : access Gtk_Clist_Record; |
Row | : Gint; | |
Style | : in Gtk.Style.Gtk_Style); |
function Get_Row_Style
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint) return Gtk.Style.Gtk_Style; |
procedure Set_Selectable
( | Clist | : access Gtk_Clist_Record; |
Row | : Gint; | |
Selectable | : Boolean); |
function Get_Selectable
( | Clist | : access Gtk_Clist_Record; |
Row | : Gint) return Boolean; |
procedure Select_Row
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Column | : in Gint); |
procedure Unselect_Row
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Column | : in Gint); |
procedure Undo_Selection
( | Clist | : access Gtk_Clist_Record); |
procedure Get_Selection_Info
( | Clist | : access Gtk_Clist_Record; |
X | : in Gint; | |
Y | : in Gint; | |
Row | : out Gint; | |
Column | : out Gint; | |
Is_Valid | : out Boolean); |
procedure Select_All
( | Clist | : access Gtk_Clist_Record); |
procedure Unselect_All
( | Clist | : access Gtk_Clist_Record); |
function Get_Focus_Row
( | Clist | : access Gtk_Clist_Record) return Gint; |
function Get_Row_List
( | Clist | : access Gtk_Clist_Record) return Row_List.Glist; |
function Get_Selection
( | Widget | : access Gtk_Clist_Record) return Gtk.Enums.Gint_List.Glist; |
function Get_Cell_Type
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Column | : in Gint) return Gtk_Cell_Type; |
procedure Set_Text
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Column | : in Gint; | |
Text | : in UTF8_String); |
function Get_Text
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Column | : in Gint) return UTF8_String; |
function Get_Text
( | Clist | : access Gtk_Clist_Record; |
Row | : Gtk_Clist_Row; | |
Column | : in Gint) return UTF8_String; |
procedure Set_Pixmap
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Column | : in Gint; | |
Pixmap | : in Gdk.Pixmap.Gdk_Pixmap; | |
Mask | : in Gdk.Bitmap.Gdk_Bitmap); |
procedure Get_Pixmap
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Column | : in Gint; | |
Pixmap | : out Gdk.Pixmap.Gdk_Pixmap; | |
Mask | : out Gdk.Bitmap.Gdk_Bitmap; | |
Is_Valid | : out Boolean); |
procedure Get_Pixmap
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gtk_Clist_Row; | |
Column | : in Gint; | |
Pixmap | : out Gdk.Pixmap.Gdk_Pixmap; | |
Mask | : out Gdk.Bitmap.Gdk_Bitmap; | |
Is_Valid | : out Boolean); |
procedure Set_Pixtext
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Column | : in Gint; | |
Text | : in UTF8_String; | |
Spacing | : in Guint8; | |
Pixmap | : in Gdk.Pixmap.Gdk_Pixmap; | |
Mask | : in Gdk.Bitmap.Gdk_Bitmap); |
procedure Get_Pixtext
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Column | : in Gint; | |
Spacing | : out Guint8; | |
Pixmap | : out Gdk.Pixmap.Gdk_Pixmap; | |
Mask | : out Gdk.Bitmap.Gdk_Bitmap; | |
Is_Valid | : out Boolean); |
procedure Set_Cell_Style
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Column | : in Gint; | |
Style | : in Gtk.Style.Gtk_Style); |
function Get_Cell_Style
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Column | : in Gint) return Gtk.Style.Gtk_Style; |
procedure Set_Shift
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Column | : in Gint; | |
Vertical | : in Gint; | |
Horizontal | : in Gint); |
procedure Set_Cell_Contents
( | Clist | : access Gtk_Clist_Record; |
Row | : Gtk_Clist_Row; | |
Column | : Gint; | |
Cell_Type | : Gtk_Cell_Type; | |
Text | : UTF8_String; | |
Spacing | : Guint8; | |
Pixmap | : Gdk.Pixmap.Gdk_Pixmap; | |
Mask | : Gdk.Bitmap.Gdk_Bitmap); |
procedure Set_Reorderable
( | Clist | : access Gtk_Clist_Record; |
Reorderable | : Boolean); |
procedure Set_Use_Drag_Icons
( | Clist | : access Gtk_Clist_Record; |
Use_Icons | : Boolean); |
procedure Set_Button_Actions
( | Clist | : access Gtk_Clist_Record; |
Button | : Guint; | |
Button_Action | : Gtk_Button_Action); |
procedure Moveto
( | Clist | : access Gtk_Clist_Record; |
Row | : in Gint; | |
Column | : in Gint; | |
Row_Align | : in Gfloat; | |
Col_Align | : in Gfloat); |
procedure Set_Show_Titles
( | Clist | : access Gtk_Clist_Record; |
Show | : Boolean); |
This widget is deprecated. Use Gtk.Tree_View instead.
This widget displays a multi-column list. Each line is made of a number of column, each being able to display any kind of widget.
The intersection of a line and a column is called a Cell. Each cell can have a different type (Cell_Text, Cell_Pixmap, Cell_Pixtext), and display its contents depending on this type. For instance, the text is not displayed in the type is Cell_Pixmap.
Note that this type is changed dynamically by some of the subprograms below, like Set_Pixmap, Set_Text, ... and Set_Cell_Contents This is one of the most powerful widgets in GtkAda, that can be used to display an kind of information. Look also into using Gtk_Ctree, which is a similar widget.
You can add scrolling in a Gtk_Clist by adding it in a Gtk_Scrolled_Window.
Binding from C File version 2.8.17
<testgtk>create_clist.adb</testgtk>