blob: d9d5899c1dfceb299f81feeede7d86a02438979b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
|
// included by gtk2.pas
{$IFDEF read_forward_definitions}
{$ENDIF read_forward_definitions}
{$IFDEF read_interface_types}
type
PGtkExpanderPrivate = pointer;
PGtkExpander = ^TGtkExpander;
TGtkExpander = record
bin : TGtkBin;
priv : PGtkExpanderPrivate;
end;
{ Key binding signal; to get notification on the expansion
state connect to notify:expanded.
}
PGtkExpanderClass = ^TGtkExpanderClass;
TGtkExpanderClass = record
parent_class : TGtkBinClass;
activate : procedure (expander:PGtkExpander);cdecl;
end;
{$ENDIF read_interface_types}
{$IFDEF read_interface_rest}
function GTK_TYPE_EXPANDER : GType;
function GTK_EXPANDER(obj : pointer) : PGtkExpander;
function GTK_EXPANDER_CLASS(klass : pointer) : PGtkExpanderClass;
function GTK_IS_EXPANDER(obj : pointer) : gboolean;
function GTK_IS_EXPANDER_CLASS(klass : pointer) : gboolean;
function GTK_EXPANDER_GET_CLASS(obj : pointer) : PGtkExpanderClass;
function gtk_expander_get_type:GType;cdecl;external gtklib name 'gtk_expander_get_type';
function gtk_expander_new(szLabel:Pgchar):PGtkWidget;cdecl;external gtklib name 'gtk_expander_new';
function gtk_expander_new_with_mnemonic(szLabel:Pgchar):PGtkWidget;cdecl;external gtklib name 'gtk_expander_new_with_mnemonic';
procedure gtk_expander_set_expanded(expander:PGtkExpander; expanded:gboolean);cdecl;external gtklib name 'gtk_expander_set_expanded';
function gtk_expander_get_expanded(expander:PGtkExpander):gboolean;cdecl;external gtklib name 'gtk_expander_get_expanded';
{ Spacing between the expander/label and the child }
procedure gtk_expander_set_spacing(expander:PGtkExpander; spacing:gint);cdecl;external gtklib name 'gtk_expander_set_spacing';
function gtk_expander_get_spacing(expander:PGtkExpander):gint;cdecl;external gtklib name 'gtk_expander_get_spacing';
procedure gtk_expander_set_label(expander:PGtkExpander; szLabel:Pgchar);cdecl;external gtklib name 'gtk_expander_set_label';
function gtk_expander_get_label(expander:PGtkExpander):Pgchar;cdecl;external gtklib name 'gtk_expander_get_label';
procedure gtk_expander_set_use_underline(expander:PGtkExpander; use_underline:gboolean);cdecl;external gtklib name 'gtk_expander_set_use_underline';
function gtk_expander_get_use_underline(expander:PGtkExpander):gboolean;cdecl;external gtklib name 'gtk_expander_get_use_underline';
procedure gtk_expander_set_use_markup(expander:PGtkExpander; use_markup:gboolean);cdecl;external gtklib name 'gtk_expander_set_use_markup';
function gtk_expander_get_use_markup(expander:PGtkExpander):gboolean;cdecl;external gtklib name 'gtk_expander_get_use_markup';
procedure gtk_expander_set_label_widget(expander:PGtkExpander; label_widget:PGtkWidget);cdecl;external gtklib name 'gtk_expander_set_label_widget';
function gtk_expander_get_label_widget(expander:PGtkExpander):PGtkWidget;cdecl;external gtklib name 'gtk_expander_get_label_widget';
{$endif read_interface_rest}
{$ifdef read_implementation}
function GTK_TYPE_EXPANDER : GType;
begin
GTK_TYPE_EXPANDER:=gtk_expander_get_type;
end;
function GTK_EXPANDER(obj : pointer) : PGtkExpander;
begin
GTK_EXPANDER:=PGtkExpander(G_TYPE_CHECK_INSTANCE_CAST(obj,GTK_TYPE_EXPANDER));
end;
function GTK_EXPANDER_CLASS(klass : pointer) : PGtkExpanderClass;
begin
GTK_EXPANDER_CLASS:=PGtkExpanderClass(G_TYPE_CHECK_CLASS_CAST(klass,GTK_TYPE_EXPANDER));
end;
function GTK_IS_EXPANDER(obj : pointer) : gboolean;
begin
GTK_IS_EXPANDER:=G_TYPE_CHECK_INSTANCE_TYPE(obj,GTK_TYPE_EXPANDER);
end;
function GTK_IS_EXPANDER_CLASS(klass : pointer) : gboolean;
begin
GTK_IS_EXPANDER_CLASS:=G_TYPE_CHECK_CLASS_TYPE(klass,GTK_TYPE_EXPANDER);
end;
function GTK_EXPANDER_GET_CLASS(obj : pointer) : PGtkExpanderClass;
begin
GTK_EXPANDER_GET_CLASS:=PGtkExpanderClass(G_TYPE_INSTANCE_GET_CLASS(obj,GTK_TYPE_EXPANDER));
end;
{$endif read_implementation}
|
