type Gtk_Sheet_Record is new Gtk.Container.Gtk_Container_Record with private;
type Gtk_Sheet_Child_Record is new Gtk.Widget.Gtk_Widget_Record with private;
type Gtk_Sheet is access all Gtk_Sheet_Record'Class;
type Gtk_Sheet_Range is access all Gtk_Sheet_Range_Record;
type Gtk_Sheet_Child is access all Gtk_Sheet_Child_Record'Class;
type Sheet_Attr_Type is (Sheet_Foreground, Sheet_Background, Sheet_Font, Sheet_Justification, Sheet_Border, Sheet_Border_Color, Sheet_Is_Editable, Sheet_Is_Visible);
type Sheet_State is (Sheet_Normal, Sheet_Row_Selected, Sheet_Column_Selected, Sheet_Range_Selected);
No_Border : constant Gtk_Sheet_Border;
Left_Border : constant Gtk_Sheet_Border;
Right_Border : constant Gtk_Sheet_Border;
Top_Border : constant Gtk_Sheet_Border;
Bottom_Border : constant Gtk_Sheet_Border;
All_Borders : constant Gtk_Sheet_Border;
procedure Gtk_New
( | Sheet | : out Gtk_Sheet; |
Rows | : Guint; | |
Columns | : Guint; | |
Title | : UTF8_String := ""; | |
Entry_Type | : Gtk_Type := GType_Invalid); |
procedure Initialize
( | Sheet | : access Gtk_Sheet_Record'Class; |
Rows | : Guint; | |
Columns | : Guint; | |
Title | : UTF8_String := ""; | |
Entry_Type | : Gtk_Type := GType_Invalid); |
procedure Gtk_New_Browser
( | Sheet | : out Gtk_Sheet; |
Rows | : Guint; | |
Columns | : Guint; | |
Title | : UTF8_String := ""); |
procedure Initialize_Browser
( | Sheet | : access Gtk_Sheet_Record'Class; |
Rows | : in Guint; | |
Columns | : in Guint; | |
Title | : in UTF8_String := ""); |
function Get_Type return Gtk.Gtk_Type;
procedure Set_Hadjustment
( | Sheet | : access Gtk_Sheet_Record; |
Adjustment | : access Gtk_Adjustment_Record'Class); |
procedure Set_Vadjustment
( | Sheet | : access Gtk_Sheet_Record; |
Adjustment | : access Gtk_Adjustment_Record'Class); |
function Get_Vadjustment
( | Sheet | : access Gtk_Sheet_Record) return Gtk.Adjustment.Gtk_Adjustment; |
function Get_Hadjustment
( | Sheet | : access Gtk_Sheet_Record) return Gtk.Adjustment.Gtk_Adjustment; |
procedure Change_Entry
( | Sheet | : access Gtk_Sheet_Record; |
Entry_Type | : Gtk_Type); |
function Get_Entry
( | Sheet | : access Gtk_Sheet_Record) return Gtk.GEntry.Gtk_Entry; |
function Get_Entry_Widget
( | Sheet | : access Gtk_Sheet_Record) return Gtk.Widget.Gtk_Widget; |
procedure Set_Title
( | Sheet | : access Gtk_Sheet_Record; |
Title | : UTF8_String); |
procedure Freeze
( | Sheet | : access Gtk_Sheet_Record); |
procedure Thaw
( | Sheet | : access Gtk_Sheet_Record); |
procedure Moveto
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Column | : Gint; | |
Row_Align | : Gfloat; | |
Col_Align | : Gfloat); |
procedure Set_Background
( | Sheet | : access Gtk_Sheet_Record; |
Color | : Gdk.Color.Gdk_Color); |
procedure Set_Grid
( | Sheet | : access Gtk_Sheet_Record; |
Color | : Gdk.Color.Gdk_Color); |
procedure Show_Grid
( | Sheet | : access Gtk_Sheet_Record; |
Show | : Boolean); |
function Grid_Visible
( | Sheet | : access Gtk_Sheet_Record) return Boolean; |
function Get_State
( | Sheet | : access Gtk_Sheet_Record) return Sheet_State; |
function Get_Range
( | Sheet | : access Gtk_Sheet_Record) return Gtk_Sheet_Range; |
procedure Get_Visible_Range
( | Sheet | : access Gtk_Sheet_Record; |
The_Range | : out Gtk_Sheet_Range); |
procedure Set_Selection_Mode
( | Sheet | : access Gtk_Sheet_Record; |
Mode | : Gtk.Enums.Gtk_Selection_Mode); |
procedure Select_Column
( | Sheet | : access Gtk_Sheet_Record; |
Column | : Gint); |
procedure Select_Row
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint); |
procedure Set_Autoresize
( | Sheet | : access Gtk_Sheet_Record; |
Autoresize | : Boolean); |
function Autoresize
( | Sheet | : access Gtk_Sheet_Record) return Boolean; |
procedure Set_Autoscroll
( | Sheet | : access Gtk_Sheet_Record; |
Autoscroll | : Boolean); |
function Autoscroll
( | Sheet | : access Gtk_Sheet_Record) return Boolean; |
procedure Set_Clip_Text
( | Sheet | : access Gtk_Sheet_Record; |
Clip | : Boolean); |
function Clip_Text
( | Sheet | : access Gtk_Sheet_Record) return Boolean; |
procedure Set_Justify_Entry
( | Sheet | : access Gtk_Sheet_Record; |
Justify_Entry | : Boolean); |
function Justify_Entry
( | Sheet | : access Gtk_Sheet_Record) return Boolean; |
procedure Set_Locked
( | Sheet | : access Gtk_Sheet_Record; |
Locked | : Boolean); |
function Locked
( | Sheet | : access Gtk_Sheet_Record) return Boolean; |
procedure Select_Range
( | Sheet | : access Gtk_Sheet_Record; |
The_Range | : Gtk_Sheet_Range); |
procedure Unselect_Range
( | Sheet | : access Gtk_Sheet_Record); |
procedure Clip_Range
( | Sheet | : access Gtk_Sheet_Record; |
The_Range | : in Gtk_Sheet_Range); |
function In_Clip
( | Sheet | : access Gtk_Sheet_Record) return Boolean; |
function Set_Active_Cell
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Column | : Gint) return Boolean; |
procedure Get_Active_Cell
( | Sheet | : access Gtk_Sheet_Record; |
Row | : out Gint; | |
Column | : out Gint); |
procedure Set_Column_Title
( | Sheet | : access Gtk_Sheet_Record; |
Column | : Gint; | |
Title | : UTF8_String); |
function Get_Column_Title
( | Sheet | : access Gtk_Sheet_Record; |
Column | : Gint) return UTF8_String; |
procedure Set_Column_Titles_Height
( | Sheet | : access Gtk_Sheet_Record; |
Height | : Guint); |
procedure Column_Button_Add_Label
( | Sheet | : access Gtk_Sheet_Record; |
Column | : Gint; | |
Label | : UTF8_String); |
function Column_Button_Get_Label
( | Sheet | : access Gtk_Sheet_Record; |
Column | : Gint) return UTF8_String; |
procedure Column_Button_Justify
( | Sheet | : access Gtk_Sheet_Record; |
Column | : Gint; | |
Justification | : Gtk.Enums.Gtk_Justification); |
procedure Show_Column_Titles
( | Sheet | : access Gtk_Sheet_Record); |
procedure Hide_Column_Titles
( | Sheet | : access Gtk_Sheet_Record); |
function Column_Titles_Visible
( | Sheet | : access Gtk_Sheet_Record) return Boolean; |
procedure Columns_Set_Sensitivity
( | Sheet | : access Gtk_Sheet_Record; |
Sensitive | : Boolean); |
procedure Column_Set_Sensitivity
( | Sheet | : access Gtk_Sheet_Record; |
Column | : Gint; | |
Sensitive | : Boolean); |
procedure Column_Set_Visibility
( | Sheet | : access Gtk_Sheet_Record; |
Column | : Gint; | |
Visible | : Boolean); |
procedure Columns_Set_Resizable
( | Sheet | : access Gtk_Sheet_Record; |
Resizable | : Boolean); |
function Columns_Resizable
( | Sheet | : access Gtk_Sheet_Record) return Boolean; |
procedure Column_Label_Set_Visibility
( | Sheet | : access Gtk_Sheet_Record; |
Column | : Gint; | |
Visible | : Boolean := True); |
procedure Columns_Labels_Set_Visibility
( | Sheet | : access Gtk_Sheet_Record; |
Visible | : Boolean := True); |
procedure Set_Column_Width
( | Sheet | : access Gtk_Sheet_Record; |
Column | : Gint; | |
Width | : Guint); |
function Get_Column_Width
( | Sheet | : access Gtk_Sheet_Record; |
Column | : in Gint) return Gint; |
procedure Add_Column
( | Sheet | : access Gtk_Sheet_Record; |
Ncols | : Guint); |
procedure Insert_Columns
( | Sheet | : access Gtk_Sheet_Record; |
Col | : Guint; | |
Ncols | : Guint); |
procedure Delete_Columns
( | Sheet | : access Gtk_Sheet_Record; |
Col | : Guint; | |
Ncols | : Guint); |
procedure Column_Set_Justification
( | Sheet | : access Gtk_Sheet_Record; |
Column | : Gint; | |
Justification | : Gtk.Enums.Gtk_Justification); |
function Get_Columns_Count
( | Sheet | : access Gtk_Sheet_Record) return Guint; |
procedure Set_Row_Title
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Title | : UTF8_String); |
function Get_Row_Title
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint) return UTF8_String; |
procedure Set_Row_Titles_Width
( | Sheet | : access Gtk_Sheet_Record; |
Width | : Guint); |
procedure Row_Button_Add_Label
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Label | : UTF8_String); |
function Row_Button_Get_Label
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint) return UTF8_String; |
procedure Row_Button_Justify
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Justification | : Gtk.Enums.Gtk_Justification); |
procedure Show_Row_Titles
( | Sheet | : access Gtk_Sheet_Record); |
procedure Hide_Row_Titles
( | Sheet | : access Gtk_Sheet_Record); |
function Row_Titles_Visible
( | Sheet | : access Gtk_Sheet_Record) return Boolean; |
procedure Rows_Set_Sensitivity
( | Sheet | : access Gtk_Sheet_Record; |
Sensitive | : in Boolean); |
procedure Row_Set_Sensitivity
( | Sheet | : access Gtk_Sheet_Record; |
Row | : in Gint; | |
Sensitive | : in Boolean); |
procedure Row_Set_Visibility
( | Sheet | : access Gtk_Sheet_Record; |
Row | : in Gint; | |
Visible | : in Boolean); |
procedure Row_Label_Set_Visibility
( | Sheet | : access Gtk_Sheet_Record; |
Row | : in Gint; | |
Visible | : in Boolean := True); |
procedure Rows_Labels_Set_Visibility
( | Sheet | : access Gtk_Sheet_Record; |
Visible | : Boolean := True); |
procedure Rows_Set_Resizable
( | Sheet | : access Gtk_Sheet_Record; |
Resizable | : Boolean); |
function Rows_Resizable
( | Sheet | : access Gtk_Sheet_Record) return Boolean; |
procedure Set_Row_Height
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Height | : Guint); |
function Get_Row_Height
( | Sheet | : access Gtk_Sheet_Record; |
Row | : in Gint) return Gint; |
procedure Add_Row
( | Sheet | : access Gtk_Sheet_Record; |
Nrows | : Guint); |
procedure Insert_Rows
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Guint; | |
Nrows | : Guint); |
procedure Delete_Rows
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Guint; | |
Nrows | : Guint); |
function Get_Rows_Count
( | Sheet | : access Gtk_Sheet_Record) return Guint; |
function Range_Get_Type return Gtk.Gtk_Type;
procedure Range_Clear
( | Sheet | : access Gtk_Sheet_Record; |
The_Range | : Gtk_Sheet_Range); |
procedure Range_Delete
( | Sheet | : access Gtk_Sheet_Record; |
The_Range | : Gtk_Sheet_Range); |
procedure Range_Set_Background
( | Sheet | : access Gtk_Sheet_Record; |
The_Range | : Gtk_Sheet_Range; | |
Color | : Gdk.Color.Gdk_Color); |
procedure Range_Set_Foreground
( | Sheet | : access Gtk_Sheet_Record; |
The_Range | : Gtk_Sheet_Range; | |
Color | : Gdk.Color.Gdk_Color); |
procedure Range_Set_Justification
( | Sheet | : access Gtk_Sheet_Record; |
The_Range | : Gtk_Sheet_Range; | |
Justification | : Gtk.Enums.Gtk_Justification); |
procedure Range_Set_Editable
( | Sheet | : access Gtk_Sheet_Record; |
The_Range | : Gtk_Sheet_Range; | |
Editable | : Boolean); |
procedure Range_Set_Visible
( | Sheet | : access Gtk_Sheet_Record; |
The_Range | : in Gtk_Sheet_Range; | |
Visible | : in Boolean); |
procedure Range_Set_Border
( | Sheet | : access Gtk_Sheet_Record; |
The_Range | : Gtk_Sheet_Range; | |
Mask | : Gtk_Sheet_Border; | |
Width | : Guint; | |
Line_Style | : Gdk.GC.Gdk_Line_Style); |
procedure Range_Set_Border_Color
( | Sheet | : access Gtk_Sheet_Record; |
The_Range | : Gtk_Sheet_Range; | |
Color | : Gdk.Color.Gdk_Color); |
procedure Range_Set_Font
( | Sheet | : access Gtk_Sheet_Record; |
The_Range | : Gtk_Sheet_Range; | |
Font | : Pango.Font.Pango_Font_Description); |
procedure Set_Cell
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Col | : Gint; | |
Justification | : Gtk.Enums.Gtk_Justification; | |
Text | : UTF8_String); |
procedure Set_Cell_Text
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Col | : Gint; | |
Text | : UTF8_String); |
function Cell_Get_Text
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Col | : Gint) return UTF8_String; |
procedure Cell_Clear
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Col | : Gint); |
procedure Cell_Delete
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Col | : Gint); |
function Cell_Get_State
( | Sheet | : access Gtk_Sheet_Record; |
Row | : in Gint; | |
Col | : in Gint) return Gtk.Enums.Gtk_State_Type; |
procedure Get_Pixel_Info
( | Sheet | : access Gtk_Sheet_Record; |
X | : Gint; | |
Y | : Gint; | |
Row | : out Gint; | |
Column | : out Gint); |
procedure Get_Cell_Area
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Column | : Gint; | |
Area | : out Gdk.Rectangle.Gdk_Rectangle); |
procedure Put
( | Sheet | : access Gtk_Sheet_Record; |
Widget | : access Gtk.Widget.Gtk_Widget_Record'Class; | |
X | : Gint; | |
Y | : Gint); |
procedure Attach
( | Sheet | : access Gtk_Sheet_Record; |
Widget | : access Gtk.Widget.Gtk_Widget_Record'Class; | |
Row | : Gint; | |
Col | : Gint; | |
Xoptions | : Gtk.Enums.Gtk_Attach_Options := Expand or Fill; | |
Yoptions | : Gtk.Enums.Gtk_Attach_Options := Expand or Fill; | |
Xpadding | : Gint := 0; | |
Ypadding | : Gint := 0); |
procedure Attach_Floating
( | Sheet | : access Gtk_Sheet_Record; |
Widget | : access Gtk.Widget.Gtk_Widget_Record'Class; | |
Row | : Gint; | |
Col | : Gint); |
procedure Move_Child
( | Sheet | : access Gtk_Sheet_Record; |
Widget | : access Gtk.Widget.Gtk_Widget_Record'Class; | |
X | : Gint; | |
Y | : Gint); |
function Get_Child_At
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Col | : Gint) return Gtk_Sheet_Child; |
function Get_Widget
( | Child | : Gtk_Sheet_Child) return Gtk.Widget.Gtk_Widget; |
procedure Button_Attach
( | Sheet | : access Gtk_Sheet_Record; |
Widget | : access Gtk.Widget.Gtk_Widget_Record'Class; | |
Row | : Gint; | |
Col | : Gint); |
procedure Remove_Link
( | Sheet | : access Gtk_Sheet_Record; |
Row | : Gint; | |
Col | : Gint); |
A Gtk_Sheet is a table like the one you can find in most spreadsheets.
Each cell can contain some text or any kind of widgets.
Binding from C File version gtkextra 2.1.1
<testgtk>create_sheet.adb</testgtk>