type Selection_Data is new Gdk.C_Proxy;
subtype Gdk_Selection is Gdk.Types.Gdk_Atom;
subtype Gdk_Selection_Type is Gdk.Types.Gdk_Atom;
subtype Gdk_Target is Gdk.Types.Gdk_Atom;
type Target_Entry is record Target : Gtkada.Types.Chars_Ptr; Flags : Target_Flags; Info : Guint; end record;
type Target_Entry_Array is array (Natural range <>) of Target_Entry;
type Target_List is new Gdk.C_Proxy;
Selection_Primary : constant Gdk_Selection;
Selection_Secondary : constant Gdk_Selection;
Selection_Type_Atom : constant Gdk_Selection_Type;
Selection_Type_Bitmap : constant Gdk_Selection_Type;
Selection_Type_Colormap : constant Gdk_Selection_Type;
Selection_Type_Drawable : constant Gdk_Selection_Type;
Selection_Type_Integer : constant Gdk_Selection_Type;
Selection_Type_Pixmap : constant Gdk_Selection_Type;
Selection_Type_Window : constant Gdk_Selection_Type;
Selection_Type_String : constant Gdk_Selection_Type;
Target_Bitmap : constant Gdk_Target;
Target_Colormap : constant Gdk_Target;
Target_Drawable : constant Gdk_Target;
Target_Pixmap : constant Gdk_Target;
Target_String : constant Gdk_Target;
Target_No_Constraint : constant Target_Flags;
Target_Same_App : constant Target_Flags;
Target_Same_Widget : constant Target_Flags;
Any_Target_Entry : Target_Entry_Array (1 .. 0);
function Target_List_New
| ( | Targets | : Target_Entry_Array) return Target_List; |
procedure Target_List_Ref
| ( | List | : Target_List); |
procedure Target_List_Unref
| ( | List | : Target_List); |
procedure Target_List_Add
| ( | List | : Target_List; |
| Target | : Gdk.Types.Gdk_Atom; | |
| Flags | : Guint; | |
| Info | : Guint); |
procedure Target_List_Add_Table
| ( | List | : Target_List; |
| Targets | : Target_Entry_Array); |
procedure Target_List_Add_Text_Targets
| ( | List | : Target_List; |
| Info | : Guint); |
procedure Target_List_Add_URI_Targets
| ( | List | : Target_List; |
| Info | : Guint); |
procedure Target_List_Add_Image_Targets
| ( | List | : Target_List; |
| Info | : Guint; | |
| Writable | : Boolean); |
procedure Target_List_Remove
| ( | List | : Target_List; |
| Target | : Gdk.Types.Gdk_Atom); |
procedure Target_List_Find
| ( | List | : Target_List; |
| Target | : Gdk.Types.Gdk_Atom; | |
| Info | : out Guint; | |
| Found | : out Boolean); |
function Selection_Get_Type return Glib.GType;
function Get_Selection
| ( | Selection | : Selection_Data) return Gdk_Selection; |
function Get_Target
| ( | Selection | : Selection_Data) return Gdk.Types.Gdk_Atom; |
function Get_Type
| ( | Selection | : Selection_Data) return Gdk.Types.Gdk_Atom; |
function Get_Format
| ( | Selection | : Selection_Data) return Gint; |
function Get_Data
| ( | Selection | : Selection_Data) return System.Address; |
function Get_Data_As_String
| ( | Selection | : Selection_Data) return String; |
function Get_Length
| ( | Selection | : Selection_Data) return Gint; |
function Set_Pixbuf
| ( | Selection | : Selection_Data; |
| Pixbuf | : Gdk.Pixbuf.Gdk_Pixbuf) return Boolean; |
function Get_Pixbuf
| ( | Selection | : Selection_Data) return Gdk.Pixbuf.Gdk_Pixbuf; |
function Targets_Include_Image
| ( | Selection | : Selection_Data; |
| Writable | : Boolean := True) return Boolean; |
function Set_Text
| ( | Selection | : Selection_Data; |
| Str | : UTF8_String) return Boolean; |
function Get_Text
| ( | Selection | : Selection_Data) return UTF8_String; |
function Targets_Include_Text
| ( | Selection | : Selection_Data) return Boolean; |
function Set_Uris
| ( | Selection | : Selection_Data; |
| URIs | : GNAT.Strings.String_List) return Boolean; |
function Get_Uris
| ( | Selection | : Selection_Data) return GNAT.Strings.String_List; |
function Get_Targets
| ( | Selection | : Selection_Data) return Gdk.Types.Gdk_Atom_Array; |
procedure Selection_Data_Set
| ( | Selection | : Selection_Data; |
| The_Type | : Gdk.Types.Gdk_Atom; | |
| Format | : Gint; | |
| Data | : System.Address; | |
| Length | : Gint); |
procedure Selection_Data_Set
| ( | Selection | : Selection_Data; |
| The_Type | : Gdk.Types.Gdk_Atom; | |
| Format | : Gint; | |
| Data | : String); |
function Selection_Data_Copy
| ( | Selection | : Selection_Data) return Selection_Data; |
procedure Selection_Data_Free
| ( | Selection | : Selection_Data); |
function Owner_Set
| ( | Widget | : Gtk.Widget.Gtk_Widget; |
| Selection | : Gdk_Selection := Selection_Primary; | |
| Time | : Guint32 := 0) return Boolean; |
procedure Add_Target
| ( | Widget | : access Gtk.Widget.Gtk_Widget_Record'Class; |
| Selection | : Gdk_Selection; | |
| Target | : Gdk.Types.Gdk_Atom; | |
| Info | : Guint); |
procedure Add_Targets
| ( | Widget | : access Gtk.Widget.Gtk_Widget_Record'Class; |
| Selection | : Gdk_Selection; | |
| Targets | : Target_Entry_Array); |
procedure Clear_Targets
| ( | Widget | : access Gtk.Widget.Gtk_Widget_Record'Class; |
| Selection | : Gdk_Selection); |
function Convert
| ( | Widget | : access Gtk.Widget.Gtk_Widget_Record'Class; |
| Selection | : Gdk_Selection := Selection_Primary; | |
| Target | : Gdk.Types.Gdk_Atom; | |
| Time | : Guint32 := 0) return Boolean; |
procedure Remove_All
| ( | Widget | : access Gtk.Widget.Gtk_Widget_Record'Class); |
Binding from C File version 2.8.17
<testgtk>create_selection.adb</testgtk>