Description
A
Gtk_Paned is a container that organizes its two children either
horizontally or vertically.
The initial size allocated to the children depends on the size
they request. However, the user has the possibility to interactively
move a separation bar between the two to enlarge one of the children,
while at the same time shrinking the second one.
The bar can be moved by clicking with the mouse on a small cursor
displayed in the bar, and then dragging the mouse.
No additional decoration is provided around the children.
Each child has two parameters, Resize and Shrink.
If Shrink is True, then the widget can be made smaller than its
requisition size by the user. Set this to False if you want to
set a minimum size.
if Resize is True, this means that the child accepts to be resized, and
will not require any size. Thus, the size allocated to it will be
the total size allocated to the container minus the size requested by
the other child.
If Resize is False, the child should ask for a specific size, which it
will get. The other child will be resized accordingly.
If both Child have the same value for Resize (either True or False), then
the size allocated to each is a ratio between the size requested by both.
When you use Set_Position with a parameter other than -1, or the user
moves the handle to resize the widgets, the behavior of Resize is
canceled.
Types
-
type Gtk_Hpaned is Gtk_Paned;
-
type Gtk_Hpaned_Record is Gtk_Paned_Record;
-
type Gtk_Paned is access all Gtk_Paned_Record'Class;
-
-
type Gtk_Vpaned is Gtk_Paned;
-
type Gtk_Vpaned_Record is Gtk_Paned_Record;
Subprograms
-
procedure Gtk_New_Vpaned (Widget : out Gtk_Paned);
-
procedure Gtk_New_Hpaned (Widget : out Gtk_Paned);
-
procedure Initialize_Vpaned (Widget : access Gtk_Paned_Record'Class);
-
procedure Initialize_Hpaned (Widget : access Gtk_Paned_Record'Class);
-
-
procedure Add1
(Paned : access Gtk_Paned_Record;
Child : access Gtk_Widget_Record'Class);
-
procedure Pack1
(Paned : access Gtk_Paned_Record;
Child : access Gtk_Widget_Record'Class;
Resize : Boolean := False;
Shrink : Boolean := True);
-
procedure Add2
(Paned : access Gtk_Paned_Record;
Child : access Gtk_Widget_Record'Class);
-
procedure Pack2
(Paned : access Gtk_Paned_Record;
Child : access Gtk_Widget_Record'Class;
Resize : Boolean := False;
Shrink : Boolean := False);
-
procedure Set_Position (Paned : access Gtk_Paned_Record; Position : Gint);
function Get_Position (Paned : access Gtk_Paned_Record) return Gint;
-
-
-
function Get_Child1_Resize
(Paned : access Gtk_Paned_Record) return Boolean;
-
function Get_Child2_Resize (Paned : access Gtk_Paned_Record) return Boolean;
-
function Get_Child1_Shrink (Paned : access Gtk_Paned_Record) return Boolean;
-
function Get_Child2_Shrink (Paned : access Gtk_Paned_Record) return Boolean;