type Gtk_Preview_Record is new Gtk.Widget.Gtk_Widget_Record with private;
type Gtk_Preview_Info_Record is new Gtk.Widget.Gtk_Widget_Record with private;
type Gtk_Preview is access all Gtk_Preview_Record'Class;
type Gtk_Preview_Info is access all Gtk_Preview_Info_Record'Class;
Expand_Property : constant Glib.Properties.Property_Boolean;
procedure Draw_Row
| ( | Preview | : access Gtk_Preview_Record; |
| Data | : Guchar_Array; | |
| X | : Gint; | |
| Y | : Gint; | |
| W | : Gint); |
function Get_Cmap return Gdk.Color.Gdk_Colormap;
function Get_Info return Gtk_Preview_Info;
function Get_Visual return Gdk.Visual.Gdk_Visual;
procedure Gtk_New
| ( | Preview | : out Gtk_Preview; |
| The_Type | : Gtk_Preview_Type); |
procedure Initialize
| ( | Preview | : access Gtk_Preview_Record'Class; |
| The_Type | : Gtk_Preview_Type); |
function Get_Type return Glib.GType;
procedure Put
| ( | Preview | : access Gtk_Preview_Record; |
| Window | : Gdk.Window.Gdk_Window; | |
| Gc | : Gdk.GC.Gdk_GC; | |
| Srcx | : Gint; | |
| Srcy | : Gint; | |
| Destx | : Gint; | |
| Desty | : Gint; | |
| Width | : Gint; | |
| Height | : Gint); |
procedure Set_Expand
| ( | Preview | : access Gtk_Preview_Record; |
| Expand | : Boolean); |
procedure Set_Gamma
| ( | Gamma | : Gdouble); |
procedure Set_Install_Cmap
| ( | Install_Cmap | : Gint); |
procedure Set_Reserved
| ( | Nreserved | : Gint); |
procedure Size
| ( | Preview | : access Gtk_Preview_Record; |
| Width | : Gint; | |
| Height | : Gint); |
Binding from C File version 2.8.17
<testgtk>create_preview_color.adb</testgtk>