type User_Data is private;
type Menu_Registration_Procedure is access procedure (User : User_Data; Item_Name : String; Accel_Path : String);
type Save_Desktop_Function is access function (Widget : access Gtk.Widget.Gtk_Widget_Record'Class; User : User_Data) return Glib.Xml_Int.Node_Ptr;
type Load_Desktop_Function is access function (MDI : MDI_Window; Node : Glib.Xml_Int.Node_Ptr; User : User_Data) return MDI_Child;
function Create_Menu
| ( | MDI | : access MDI_Window_Record'Class; |
| Accel_Path_Prefix | : String := " | |
| User | : User_Data; | |
| Registration | : Menu_Registration_Procedure := null) return Gtk.Menu.Gtk_Menu; |
procedure Register_Desktop_Functions
| ( | Save | : Save_Desktop_Function; |
| Load | : Load_Desktop_Function); |
function Restore_Desktop
| ( | MDI | : access MDI_Window_Record'Class; |
| Perspectives | : Glib.Xml_Int.Node_Ptr; | |
| From_Tree | : Glib.Xml_Int.Node_Ptr; | |
| User | : User_Data) return Boolean; |
procedure Load_Perspective
| ( | MDI | : access MDI_Window_Record'Class; |
| Name | : String; | |
| User | : User_Data); |
procedure Create_Perspective
| ( | MDI | : access MDI_Window_Record'Class; |
| Name | : String; | |
| User | : User_Data); |
procedure Define_Perspective
| ( | MDI | : access MDI_Window_Record'Class; |
| XML | : Glib.Xml_Int.Node_Ptr; | |
| User | : User_Data); |
procedure Save_Desktop
| ( | MDI | : access MDI_Window_Record'Class; |
| User | : User_Data; | |
| Perspectives | : out Glib.Xml_Int.Node_Ptr; | |
| Central | : out Glib.Xml_Int.Node_Ptr); |
function Get_XML_Content
| ( | MDI | : access MDI_Window_Record'Class; |
| Tag | : String) return Glib.Xml_Int.Node_Ptr; |