1// included by gtk2.pas
2
3{$IFDEF read_forward_definitions}
4{$ENDIF read_forward_definitions}
5
6{$IFDEF read_interface_types}
7type
8   PGtkColorButtonPrivate = pointer;
9
10   PGtkColorButton = ^TGtkColorButton;
11   TGtkColorButton = record
12        button : TGtkButton;
13        priv : PGtkColorButtonPrivate;
14     end;
15
16{ Padding for future expansion  }
17   PGtkColorButtonClass = ^TGtkColorButtonClass;
18   TGtkColorButtonClass = record
19        parent_class : TGtkButtonClass;
20        color_set : procedure (cp:PGtkColorButton);cdecl;
21        _gtk_reserved1 : procedure ;
22        _gtk_reserved2 : procedure ;
23        _gtk_reserved3 : procedure ;
24        _gtk_reserved4 : procedure ;
25     end;
26
27{$ENDIF read_interface_types}
28
29{$IFDEF read_interface_rest}
30
31function GTK_TYPE_COLOR_BUTTON : GType;
32function GTK_COLOR_BUTTON(obj : pointer) : PGtkColorButton;
33function GTK_COLOR_BUTTON_CLASS(klass : pointer) : PGtkColorButtonClass;
34function GTK_IS_COLOR_BUTTON(obj : pointer) : gboolean;
35function GTK_IS_COLOR_BUTTON_CLASS(klass : pointer) : gboolean;
36function GTK_COLOR_BUTTON_GET_CLASS(obj : pointer) : PGtkColorButtonClass;
37
38function gtk_color_button_get_type:GType;cdecl;external gtklib name 'gtk_color_button_get_type';
39function gtk_color_button_new:PGtkWidget;cdecl;external gtklib name 'gtk_color_button_new';
40
41function gtk_color_button_new_with_color(color:PGdkColor):PGtkWidget;cdecl;external gtklib name 'gtk_color_button_new_with_color';
42
43procedure gtk_color_button_set_color(color_button:PGtkColorButton; color:PGdkColor);cdecl;external gtklib name 'gtk_color_button_set_color';
44procedure gtk_color_button_set_alpha(color_button:PGtkColorButton; alpha:guint16);cdecl;external gtklib name 'gtk_color_button_set_alpha';
45procedure gtk_color_button_get_color(color_button:PGtkColorButton; color:PGdkColor);cdecl;external gtklib name 'gtk_color_button_get_color';
46function gtk_color_button_get_alpha(color_button:PGtkColorButton):guint16;cdecl;external gtklib name 'gtk_color_button_get_alpha';
47
48procedure gtk_color_button_set_use_alpha(color_button:PGtkColorButton; use_alpha:gboolean);cdecl;external gtklib name 'gtk_color_button_set_use_alpha';
49function gtk_color_button_get_use_alpha(color_button:PGtkColorButton):gboolean;cdecl;external gtklib name 'gtk_color_button_get_use_alpha';
50
51
52procedure gtk_color_button_set_title(color_button:PGtkColorButton; title:Pgchar);cdecl;external gtklib name 'gtk_color_button_set_title';
53function gtk_color_button_get_title(color_button:PGtkColorButton):Pgchar;cdecl;external gtklib name 'gtk_color_button_get_title';
54
55{$endif read_interface_rest}
56
57{$ifdef read_implementation}
58
59function GTK_TYPE_COLOR_BUTTON : GType;
60begin
61   GTK_TYPE_COLOR_BUTTON:=gtk_color_button_get_type;
62end;
63
64function GTK_COLOR_BUTTON(obj : pointer) : PGtkColorButton;
65begin
66   GTK_COLOR_BUTTON:=PGtkColorButton(G_TYPE_CHECK_INSTANCE_CAST(obj,GTK_TYPE_COLOR_BUTTON));
67end;
68
69function GTK_COLOR_BUTTON_CLASS(klass : pointer) : PGtkColorButtonClass;
70begin
71   GTK_COLOR_BUTTON_CLASS:=PGtkColorButtonClass(G_TYPE_CHECK_CLASS_CAST(klass,GTK_TYPE_COLOR_BUTTON));
72end;
73
74function GTK_IS_COLOR_BUTTON(obj : pointer) : gboolean;
75begin
76   GTK_IS_COLOR_BUTTON:=G_TYPE_CHECK_INSTANCE_TYPE(obj,GTK_TYPE_COLOR_BUTTON);
77end;
78
79function GTK_IS_COLOR_BUTTON_CLASS(klass : pointer) : gboolean;
80begin
81   GTK_IS_COLOR_BUTTON_CLASS:=G_TYPE_CHECK_CLASS_TYPE(klass,GTK_TYPE_COLOR_BUTTON);
82end;
83
84function GTK_COLOR_BUTTON_GET_CLASS(obj : pointer) : PGtkColorButtonClass;
85begin
86   GTK_COLOR_BUTTON_GET_CLASS:=PGtkColorButtonClass(G_TYPE_INSTANCE_GET_CLASS(obj,GTK_TYPE_COLOR_BUTTON));
87end;
88
89{$endif read_implementation}
90
91